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1. INTRODUCTION 



The User's Guide is intended to introduce the terminal user to the basic functions of the BTM system. Information 
is divided into chapters, by subsystem, and presented largely in graphic and tabular format. Simple examples illus- 
trate command usage. For additional information, the user should refer to the BTM Reference Manual (90 15 77). 

GENERAL 

As indicated in Figure 1-1, on-line services are provided by the following subsystems: 

• BASIC processor 

• EDIT source file editor 
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Figure 1-1. BTM System 
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FERRET file utility subsystem 
FORTRAN IV-H compiler 
SYMBOL assembler 
LOADER object module loader 
BPM batch job controller 



• RUN execution and debug subsystem 
Batch processing services are accessed by: 

• Local batch job decks submitted at the computer. 

• Remote batch input through a high-speed card 
reader. 

• Terminal batch input from an on-line Teletype 
terminal. 

EXECUTIVE FUNCTIONS 

The BTM Executive is a supervisory program responding to control commands from the on-line terminal. Such com- 
mands provide the user with a means of directing the flow of on-line work. In addition to the commands calling the 
BTM subsystems, the following commands may be used to perform various Executive functions: 

ASSIGN (controls file assignments) 

TABS (sets Teletype tabs) 

SAVE (saves current work) 

RESTORE (restores saved work) 

Escape (terminates currently activity) 

PROCEED (resumes terminated activity) 

BYE (terminates current work session) 

SUBSYSTEM SERVICES 

BTM includes subsystems that perform a broad range of text-editing, compiler, loader, assembler, debugging, file 
management, and terminal batch entry services. 

TEXT-EDITING SERVICES 

A powerful text-editing subsystem, called EDIT, enables terminal users to create and modify a source text file that 
can then be used for assembly or compilation either on-line under Symbol, FORTRAN, or BASIC, or in the batch 
mode under Meta-Symbol or other processors. EDIT operates on a line-number basis or by context and permits con- 
venient infra-line character string editing. EDIT functions include the following: 

Create new files 

Copy files 

Delete files 

Add, delete, insert lines 

Insert comments at specified column position 

Search for specified character string and delete, insert, replace, or list line numbers 

Reorder lines within a file 

Renumber lines 

Perform character editing by line in step mode 
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• List file contents with or without line numbers 

• Shift character strings within a line 

BASIC SERVICE 

The BASIC language developed for BTM is a highly extended version of the original Dartmouth BASIC. It is an easy- 
to-use language, developed specifically for on-line use. It includes most features of other BASIC implementations, 
in addition to new features not currently available elsewhere. BASIC programs can either be processed on-line at a 
terminal or placed into the batch job stream for execution. XDS Sigma 5/7 BASIC includes the following extended 
features: 

Alphanumeric variables 

Chaining of sequential BASIC programs 

ON statement (address switch) 

Direct statement execution (calculator mode) 

Matrix functions 

IMAGE statement 

Tab function (output format control) 

File input/output 

RUN/FAST compile option, which permits checked-out BASIC programs to execute faster without unnecessary 
array checking during run time 

The execution of Sigma 5/7 BASIC is highly efficient, with an instantaneous compilation rate of 600 statements per 
second, and the size of a user program is constrained only by the amount of core space made available to the user. 

FORTRAN IV-H COMPILER SERVICE 

The FORTRAN IV-H compiler subsystem enables on-line terminal users to compile a FORTRAN source -program file, 
thus generating an obfect-program file. The source file can be created directly on-line with the FORTRAN subsys- 
tem, via the on-line EDIT subsystem, or entered through the batch system. When source code is being created on- 
line with the FORTRAN compiler, each statement is immediately syntax-checked and the user can correct any errors 
without waiting until the end of the entire program input. Users have three compile options: debug run-time func- 
tions, source listing output file with object code, and on-line source listing. 

All error messages with the error statements are printed out at the user's terminal. User object programs can also 
assign I/O directly to the terminal teletypewriter. 

After completing compilation, terminal users can call for either EDIT, to correct source-program errors and recom- 
pile, or the FORTRAN loader and run-time subsystem, to execute compiled programs. At the user's option, the com- 
piled FORTRAN program can also be placed into the batch job stack for later execution in the batch mode. 

FORTRAN EXECUTION SERVICE 

To permit the compiled FORTRAN IV programs to be executed on-line, a FORTRAN loader and run-time subsystem 
is provided through the LOADER subsystem. The FORTRAN loader reports loading errors to the terminal user. If 
such errors are not serious, the user can call for excecution. Run-time diagnostics are reported to the terminal 
during program execution. Debugging output can also be printed at the terminal, it the Debugging option is speci- 
fied at compile time. Debugging functions include the ability to: 

• Trace source statements reached during execution 

• Display values that have been stored into variables as a result of assignment statements 

• Stop the program prior to execution of specified source lines 
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• Step the program one statement at a time 

• Request that execution be continued after a stop 

During program execution, the user's FORTRAN program can be used "conversationally" if I/O has been assigned 
to the terminal. 

LOADER SUBSYSTEM 

The LOADER subsystem loads XDS standard object-language programs from specified element files. It can also load 
library modules from specified account files or the public library file. Multiple object modules generated by Sym- 
bol, FORTRAN IV-H, and Meta-Symbol can be loaded for execution. 

If the user's program has been compiled in the debug mode, the FORTRAN debug run-time package will be loaded 
with the object program. For assembly language programs, the user can specify the Debugging option which will 
cause the DELTA debug package to be brought in with his program. The LOADER subsystem provides the following 
facilities: 

Assignment of input element files 

Library search for unsatisified references option 

Load map option 

Specification of temporary storage stack size 

Specification of FORTRAN I/O assignment 

Control of loading error severity alternatives 

Control of execution start 

Debugging option 

All activities of the LOADER subsystem are carried on conversationally, and all error messages are directed to the 
user's terminal. 

ASSEMBLER SERVICES 

The Symbol assembly subsystem, provided under BTM, permits terminal users to assemble source text files and to 
create user object program modules. Available assembly options include: 

• Assembly with or without binary output 

• Assembly with or without a listing output file 

• Assembly with or without a symbol table for on-line debugging 

• Terminal listing 

Error messages are printed at the terminal and, after an assembly is completed, control is returned to the Terminal 
Executive program. 

FERRET SUBSYSTEM 

FERRET is a utility subsystem that enables the on-line terminal user to obtain information about his permanent files. 
It also provides for limited file manipulation. FERRET performs the following functions: 

• List all file names under specified account number 

• Report date of creation and size of files 
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Indicate accessibility of specified file 

Delete file in user's account 

Copy file 

Examine specified file for number of records 

Print specified records in file (in EBCDIC or hexadecimal code) 

TERMINAL BATCH ENTRY SUBSYSTEM 

The BPM Terminal Batch Entry subsystem enables the terminal user to create a fob control file on-line and submit it 
to the BPM batch job stream. The user is then disconnected from that job and is free to pursue other activities. At 
any time, the user can also employ the Terminal Batch Entry subsystem to interrogate the system concerning the sta- 
tus of a submitted job. This status may be either (1) waiting to be run, (2) running, or (3) completed. 

The output of the job may be directed to standard peripheral output devices or to the user's permanent file storage. 
In the latter case, it is then convenient for the user to resume conversational activity at his terminal with the re- 
sults of the batch execution. 

The Terminal Batch Entry subsystem also provides a convenient editing feature to prepare control commands for job 
execution. 
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ACTIVATION CHARACTER EFFECTIVITY 

Following is a breakdown showing when the various groups of activation characters are in effect. 

When Under Executive Control 

1. Immediately after the Executive prompt character (!) the activation mode is "activate on every character". 
There may be a delay in the echoing of each character, and no backspacing or correction is possible. This mode 
is in effect when the first two characters of an Executive command are typed; e. g. , 

jAS 

2. When using the ASSIGN command, the remainder of the specification is typed in the mode "activate on ©, ©, 
or punctuation". For example, in the command 

jAS SIGN M : DO,(HERE)© 

activation occurs after the typing of: 

a. A 

b. S 

c. M : DO 

d. ( 

e. HERE 

f. ) 

3. The other Executive commands that require specifications cause the mode to be "activate on©or©". 

In the command 

ISAVE ALPHA,PERM© 
activation occurred after the typing of: 

a. S 

b. A 

c. ALPHA,PERM 

When Under Control Of Subsystems 



1. All subsystem input that is read through Data Control Blocks assigned to the user's terminal (such as source lan- 
guage input to a compiler) is gathered one line at a time under the mode "activate on ©or ©". This input is 
always prompted by the typing of a colon (:) at the beginning of the line. 

2. BASIC, EDIT, and FERRET subsystems read all input in the mode "activate on ©or©". The BPM subsystem reads 
input in this mode, except when it expects a Y or N answer; then the mode is, "activate on every character". 

3. The FORTRAN, LOADER, SYMBOL, and RUN subsystems acquire all option lists and input specifications in the 
11 activate on © or © mode" . 

4. The debugging program Delta reads in the "activate on /, =, ©, f,©,or ©mode" . 

SPECIAL TELETYPE DIRECTIVES 

There are a number of simple operations that may be performed during the typing of input to the computer. These 
operations are functions of the program that handles immediate Teletype communication, and are not to be confused 
with Executive or subsystem functions (see Table 2-1). 
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Table 2-1 Special Teletype Directives 



Directive 


Description 


Indication 


ACKNOWLEDGE 

(@Q) 


Ascertains that the Batch Timesharing Mon- 
itor is operating at any given time. Used to 
question a long delay in Teletype response. 


BTM operating will produce double excla- 
mation mark (! !) immediately. 


BACKSPACE 

(©@) 


Causes the last textual character typed to 
be deleted. 

Additional BACKSPACE causes the next 
previous character to be deleted, and so 
on, until it reaches an activation character. 

Example: 

MISPELL - SPELL 

The above, typed at the terminal, results 
in corrected spelling of MISSPELL. Back- 
spacing over certain control characters will 
cause the next previous textual character to 
be deleted. Attempted backspacing over an 
activation character will be ignored (since 
it is already in processing). 


Each time BACKSPACE is struck, (— ) is 
echoed, and the carriage is advanced one 
position. 


LOCAL NEW LINE 

© 


Causes the Teletype to be positioned to a 
new line. 


Does not terminate the current logical line. 


ERASE 

(©X) 


Effectively erases all input back to the last 
activation character. 

It is not possible to erase an activation 
character or anything typed preceding it. 


Carriage skips to beginning of next line, to 
signal that the erasure has been performed. 


RETYPE 


Causes carriage to skip to the next line and 
retype ail data following last activation 
character as it now exists in computer buffer. 

Checks results of backspacing, tabbing and 
erasing operations. 

Example: 

MISPELL SPELL ©R 

Next line: 
MISSPELL 




TAB 

(© I or ©) 


Causes a skip to the next tabular position 
across the page, inserting the proper number 
of blank spaces into the computer input. 
(Use Executive command TABS to set up col- 
umn tabular positions.) 

Note: If ®is hit inadvertently, it is nec- 
essary to backspace the number of 
times equai to the number of blanks 
inserted in skipping forward. 


Column positions for tabbing are counted 
starting after the last activation character, 
regardless of whether this begins a new line. 

The column position count is reduced auto- 
matically if backspaced, and reset to one 
if erased. 

Attempt to tab beyond last tab position set 
results in an echo of (?)and a one-position 
space input. 
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Table 2-1. Special Teletype Directives (cont.) 



Directive 


Description 


Indication 


ECHO CONTROL 

@ E 


Causes suppression of the echo return. 
Used in half-duplex operations to pre- 
vent double printing and in full -duplex 
mode to suppress printing of private 
information. 

Example: 

LOGIN: ®E ... ©E 

(The information between the two ©E's is 
not printed.) 


Printing of the echo return is suppressed by 
an © E and restored by the same command. 


PUNCH ONLY 

©P 


Causes output to go to the terminal's paper 
tape punch only. 

A second ©P restores normal operation. 





TEXT SYMBOLS 

Some symbolism is used in the text to describe formats for writing commands and parameter information. Table 2-2 
lists this information. 



Table 2-2. Format Symbols 



Symbol 


Description and Use 


CAPITAL LETTERS 


Capitals are used for all words that are to be explicitly typed, such as AS of the 
ASSIGN command, the word FILE in one of the parameters, etc. 


lower case letters 


Lower case is used to name values which are to be filled in, such as "deb name" or 
"file name" in the ASSIGN command. 


[ ] 


Brackets are never to be typed. They enclose parts of the format which are op- 
tional, or which are not always to be filled in. For example, L[lSTj indicates 
that the whole word LIST may be typed, or only the letter L. 


( ) , - 


Parentheses, commas, and dashes are separators and are always to be typed in as shown. 




Ellipsis indicates that there may be a series of two or more elements of the same 
type as that which precedes it. 


1 ( 


Braces indicate a required choice. 





Underlining indicates characters printed by the system. 
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3. START-UP AND THE EXECUTIVE 



GENERAL 

When telephone contact has been made with the on-line system and the user has logged in, it is possible to issue 
commands to the Executive program. The Executive will connect the user with the subsystem employed on on-line 
work. In addition, the Executive permits some specification of set-up conditions, interruption and continuation 
of processing, and sign-off at the end of a work session. 

COMMANDING THE EXECUTIVE 

Whenever the Executive is ready to accept a command,it types an exclamation mark (!). The first two letters of the 
command mnemonic are typed, and the Executive replies by typing the remainder of the word plus one space. Ex- 
ecutive functions are listed in Table 3-1. 



Table 3-1 . Executive Functions 



Function 


Description 


ASSIGN 


Specify or change input/output assignments. 


TABS 


Set column tabs for terminal input. 


BASIC 


Enter the BASIC language subsystem. 


BPM 


Enter the subsystem for scheduling batch jobs from the terminal. 


EDIT 


Enter the EDIT subsystem for input and modification to files. 


FERRET 


Enter the FERRET subsystem for accessibility checking and file 
operations. 


FORTRAN 


Enter the FORTRAN language subsystem. 


LOAD 


Enter the LOADER subsystem. 


SYMBOL 


Enter the SYMBOL language subsystem. 


RUN 


Enter the RUN subsystem. 


SAVE 


Save the core and register data of the present activity in order to con- 
tinue later. 


RESTORE 


Restore a previously saved activity. 


Escape 


Interrupt processing and return to the Executive. 


PROCEED 


Resume interrupted processing. 


BYE 


Sign-off. 
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START-UP AND LOG-IN 

Sequential procedures for activating the terminal and logging in appear in Table 3-2, below 



Table 3-2. Start-Up and Log-In Procedures 



Step 


Description 


Indication 


1 


Depress "ORIG" or "BREAK" key to activate terminal. 


Key lights up and remains depressed. 
Dial tone is audible. 


2 


Dial on-line system number. If there is a busy signal 


Answering "beep" indicates that con- 




or no answer, depress "CLR" to deactivate and try 


nection with computer has been. made. 




again in a few minutes. To establish contact with the 






computer, strike @ © . 




3 


When contact is made, Executive types message. 


BTM SYSTEM -x IS UP 




Exclamation point (!) indicates communication 


date and time 




Executive. Colon (:) indicates that information 


! LOGIN: 




must be typed in (step 4). 




4 


name may be up to 12 characters long, may in- 


! LOGIN: name,acct,fpass~| © 




clude letters, characters, numbers, and blanks. 

acct is up to 8 characters long and may include 
letters, numbers, and blanks. 

pass also up to 8 characters long and may include 
letters, numbers, and blanks, or nonprinting control 




t 










JOHN DOE 3RD, 














XDS 123, 


















PASSOK® 
















characters. 


If the user fails to log in within one 
minute following the ! LOGIN: request, 




Note: Only one password may be validated for each 


he is disconnected from the computer. 




name of user with a given acct, but several 






users may have same password. 










5 


Name, account and password are checked for valid- 


? 






ity. If not accepted, Executive returns another 


! LOGIN: 




request for log-in information. 






If the name, account, and password are accepted, 


ID =X 




the Executive types an ID character, and on the 


l 




next line, an exclamation mark (!) indicating that 






it is ready to accept a command. 






Note: The special ID character is assigned as a 






means of preventing duplicate names for 






certain temporary files. This is explained 






more fully later in this chapter. 




6 


Type first two letters of the command mnemonic, 


IASSIGN 




such as AS. Executive replies by typing the 






remainder of the word, plus one space. 




7 


If command requires parameter information, type the 


! ASSIGN M:SI,(FILE,X),(IN),(TEMP)@ 




information and terminate the command with @. 






There are no blanks in the parameter portion of a 






command. 
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Table 3-2. Start-Up and Log-In Procedures (cont.) 



Step 


Description 


Indication 


8 


Commands that do not require parameter information 
terminate themselves as soon as the Executive types 
the remainder of the word, and no carriage return is 
necessary. 


! BASIC 
> 


9 


If the Executive does not recognize the letters of a 
command, it replies with a question mark (?). 
Retype. 


]_BZ 
? 


10 


If it is desired to cancel a command during the typ- 
ing of its parameters, depress the "BREAK" key. 
The Executive will ignore the command, skip to 
the next line, and type an exclamation mark, await- 
ing next command. 


[ASSIGN M:SI,(F! [BREAK] 
! 



ASSIGN COMMAND 

This command changes file assignments and file options. File options, their meaning and description appear 
in Table 3-3. 

An important use of ASSIGN is prior to calling the FORTRAN, LOADER, BPM, and SYMBOL subsystems where 
it is desired to specify files of the user as source input, and where it is desired to save listings and compiled binary 
program modules in files of the user. If no special assignments are made, these subsystems make appropriate de- 
fault assignments. Refer to Table 3-4. 

Also in the above subsystems M:DO, dignostic output, is initially assigned to the user's terminal but may be 
reassigned. In the case of all the remaining subsystems, file assignments are made after the subsystems are 
called. 



Table 3-3. File Options 



Option 


Meaning 


Description 


IN 


Input file. 


A previously existing file to be read only. 


OUT 


Output file. 


A new file to be written only, not read. 


INOUT 


Update. 


A previously existing file, whose records may be read, then written. 


OUTIN 


Scratch file. 


A new file to be written, then read. 


PERM 


Permanent. 


Will not be deleted following use. Unless otherwise indicated, 
PERM is applied to all input files. 


TEMP 


Temporary. 


Will be deleted at sign-off time. Unless otherwise indicated, TEMP 
is applied by default to all output files. 
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Table 3-3. File Options (cont.) 



Option 


Meaning 


Description 


HERE 


User's Teletype. 


This input or output through user's own terminal. 


REL 


Release. 


Releases the permanent storage space occupied by a file. Use REL 
when releasing a file that previously was being permanently saved. 


SAVE 


Save. 


Obtains permanent storage space for a file. Specify SAVE with 
PERM when it is desired to save a file after sign-off (it need be 
specified only once per file). 


READ 


Specify access. 


Limits read access by other accounts to user's file. Following 
READ, up to eight account IDs (separated by commas) may be speci- 
fied to be permitted to read user's file 

When the READ option is not specified, it is assumed that all ac- 
counts may read the file. 


READ,NONE 


Specify access. 


NONE may be specified to prevent any other account from reading 
the file. 


READ, ALL 


Specify access. 


ALL may be specified to permit all accounts to read the file. 


WRITE 


Specify access. 


Specifies other accounts that are permitted to both write and read 
the file. Following WRITE, up to eight account IDs (separated by 
commas) may be specified to read or write file. 

If the WRITE option is omitted, it is assumed that no other accounts 
are permitted write access to the file. 

If there is a conflict between READ and WRITE option specifications, 
WRITE takes precedence. 


WRITE, NONE 


Specify access. 


NONE may be specified to prevent any other account from reading 
or writing. 


WRITE,ALL 


Specify access. 


ALL may be specified to permit all accounts to read and write. 



Table 3-4. DCB Default Assignment 



Subsystem 


DCB Name 


Meaning 


Default Assignment 


FORTRAN 


M:SI 
M-.LO 
M:BO 
M:SO 


Source Input 
Listed Output 
Binary Output 
Source Output 


Terminal 

Terminal 

Temporary File BOTEMPx 

Temporary File SOTEMPx 


LOADER 


M:BI 


Binary Input 


Temporary File BOTEMPx 


BPM 


M:SI 


Source Input 


Terminal 


SYMBOL 


M.CT 

M:LO 
M:BO . 


C T j. 

juui tc input 

Listed Output 
Binary Output 


Terminal 
Terminal 
Temporary File BOTEMPx 
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SPECIAL ID CHARACTER 

The special ID character is assigned as a means of preventing the occurrence of duplicate names for certain tempo- 
rary files automatically created by subsystems, in the event that two or more users are operating simultaneously 
under the same account. The assigned ID will be a letter of the alphabet or one of the digits 1 to 6. This character 
will be made a part of the names of these temporary files when any of them are created during use of the system. 
The Executive indicates the ID character assigned to the user by typing ID = x after the user logs into the system. 
Table 3-5 lists the subsystems which create temporary output files, with x representing the unique ID character in 
the file names. 



Table 3-5. Temporary Output Files 



Subsystem 


File Name 


File Function 


BASIC 


RUNxFIL 


Scratch file. 


SYMBOL 


BOTEMPx 


Default binary output. 


FORTRAN 


BOTEMPx 
SOTEMPx 


Default binary output. 

Default source language output. 


LOAD 


BOTEMPx 
SDxFIL 


Default binary output. 

Scratch file for debugging symbol tables. 
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ASSIGN (Assign DCB] 



ASSIGN causes specified changes to be made in the assignment of a given Data Control Block (a table of informa- 
tion affecting I/O operations). 



E> 



deb name is 3-8 alphanumeric characters. 

It identifies the DCB that is to be reassigned. 
The first two characters of the name are either 
F: (to indicate a user DCB) or M: (to indicate 
a standard system DCB). 



W 



option is any of the options listed in Table3-3. 
If omitted, the default (if any) for the DCB is 
assumed. 



i 1 

? T 

1A SSIGN deb name^FILEJile name)[,(option)[ / . . .]]] 

1 



E 



file name 
(i.e., A-Z, 



is 1-8 alphanumeric characters 



0-9, *, $, 



%, 



(a) 



-, on— •). 



It identifies the file to which the DCB is to be 
assigned. If omitted, the default assignment 
and default options for the DCB are assumed. 







More than one option may be specified. Each 
option must be enclosed in parentheses and a 
comma must be used to separate each option from 
the preceding one. 



Note that the action of ASSIGN commands is not cumulative; each successive ASSIGN for a given DCB cancels any 
previous ASSIGN completely. 



Example: 



JASSIGN_M:SI , (FILE, SIMBOLIK) , (IN) , (TEMP)© 
i 

This specifies that a random access device file named SIMBOLIK is to be used as source input. The file may 
be read only, and is not to be saved after sign-off. 



iAS SIGN M :B0, (FILE,L0ADM0D1) , (OUT) , (PERM) , (SAVE) , (RE AD, NONE)© 
i 

The binary output is to be made a new random access file named LOADMOD1 . It is to be saved as a perma- 
nent file, and no other account number may read or write on it. 



'.AS SIGN M :D0 , (HERE ) © 
I 

This causes diagnostic output to come out on the Teletype. This command might have been issued some time 
after the diagnostic output had been assigned to another device; however, since the normal default device is 
the Teletype, it would have been sufficient to command 

j_ASSIGN M:D0© 
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TABS (Set Tabs] 



TABS causes tab positions to be established for input from the user's Teletype. 



m 



tl is a decimal number 

specifying the first tabular 
position. If omitted, any 
previously established tabs 
are cleared. 



® 



t2 is a decimal number 

specifying the second tabu- 
lar position. It must be a 
larger number than tl . No 
tabular position may be 
specified beyond the last 
character in the input buf- 
fer. Input buffer size is a 
System Generation variable 
between 80 and 200 charac- 
ters (the default is 100). 



JTABS^[tl[,t2]. ..[,t8]] 



75 ; ~ — 

*^-s Up to eight tab positions 
may be specified. Com- 
mas are used as separators. 



When Teletype input is typed, the input image is spaced to the next tab position by striking the key and then 
striking the letter I. If no tab has been established beyond the present column, a question mark is echoed and 
the input image is spaced by one column. 



Example: 



_!_TABS 5,10,15,20© 



In this example, tab settings are established 
at columns 5, 10, 15, and 20. The command 
clears any previously established tab settings. 
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SAVE (Save Activity] 



SAVE causes the machine environemnt (i.e., register contents, etc.) and the contents of all core areas used in the 
current session to be saved as a file in secondary storage, so that the present activity may be resumed at a later 
time. 



UJ 



filename is 1 -8 alphanumeric characters, 
(i.e., A-Z, 0-9, #, $, *, %, :, @, -, ofl-,). 
It is a name selected by the user to identify the 
file in which the current activity is to be saved. 
If the name is that of an existing file, the con- 
tents of that file are replaced. 



m 



TEMP specifies that the file is not to be 
saved after the user logs out of the system. 



PERM specifies that the file is to be saved 

after the user logs out of the system. 



!SAVE file name 



JEMP 
,PERM 



Prior to saving the current activity, BTM automatically closes and saves all open files. However, the user is re- 
sponsible for the positioning of any files before giving the SAVE command. Thus, it usually is not possible to 
successfully resume an assembly, compilation, or load. 

A SAVE command (or any Executive command except Escape) may be given only when the BTM Executive is in con- 
trol of the system, as indicated by the "!" prompt character. 



Example: 



!SAVE ALL-THIS H 



In this example, the current activity is saved 
in a permanent file named ALL-THIS. The 
activity can be resumed later by specifying the 
name ALL-THIS in a RESTORE command (see 
description of RESTORE command). 
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RESTORE (Restore Activity] 



RESTORE causes the machine environment and core information of a previously saved activity to be restored (see 
description of SAVE command), so that the previous activity may be resumed. 



UJ 



file name is 1-8 alphanumeric characters 

(i.e., A-Z, 0-9, $, *, %, :, @, -, or.—). 
It identifies the file containing the saved 
activity. 



or 



TEMP specifies that the file is not to be saved 

after the user logs out of the system. This option 
is omitted if TEMP was specified when the SAVE 
was given, or if the user wants to save the file 
after logging out and TEMP was not specified in 
the SAVE. 



[RESTORE file name[,TEMP] 



Example: 



! RE STORE E RSTWILE © 

! 



In this example, the activity previously saved 
in file ERSTWILE is restored, and processing can 
be resumed by means of a PROCEED command 
(see description of PROCEED command). 
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Escape (Return to Executive] 



Escape causes control of the system to be returned to the BTM Executive. This is the only Executive command that 
may be given when the Executive is not in control. 



EU 



Striking the © key twice in succession returns 
control to the Executive if a BTM subsystem has 
control. 



E> 



1 



Striking the ©key four times in succession re- 
turns control to the Executive if a BTM subsystem 
is not in control (e.g., if a user's program is 
executing). 



(ESC)@ IJESCWJ 



When the Executive gains control of the system, it prompts the user terminal with an exclamation character. Any 
Executive command may then be given or any BTM subsystem may be called. 



Example: 



! FE RRET 
>D TROP© 

> @© 
t 



In this example, the user returns control to the 
Executive from the FERRET subsystem by strik- 
ing the ©key twice. 
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PROCEED (Resume Processing) 



PROCEED causes resumption of an activity that has been interrupted by an Escape (see description of Escape 
function). 



! PROCEED 



If the user wants to resume a previously saved activity (see description of SAVE command), he must give a 
RESTORE command followed by a PROCEED command. 



Example: 



1SAVE THIS ® 

IRE STORE THIS, TEMP© 

! P ROCEED 

> 



In this example, an interrupted subsystem activity 
is restored and processing resumed. 
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BYE (End Session] 

BYE causes the user to be logged out of the system. 

1BYE 



Following the BYE command, the Executive prints the date and time followed by the number of 512-word RAD 
granules used, minutes of CPU time used, minutes of I/O time used, and minutes of CPU time devoted to Monitor 
service functions. 



Example: 



-L CI i± 






10/15/70 


8:2C 


) 


RAD SPACE 


07 




CPU 


03. 


467 


I/O 


05 


156 


SERVICES 


04 


315 
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4. BASIC SUBSYSTEM 



GENERAL 

This section outlines the method of writing, compiling, and executing statements and programs in BASIC from the 
user's terminal. On-line BASIC operates in two distinct modes: edit, and compilation and execution (see Figure 4-1). 

EDIT MODE 

Programs may be created at the terminal and saved on disc. Previously saved programs may be retrieved and revised 
and/or loaded for further execution. The system is initially in the edit mode with an empty text area. 

COMPILATION AND EXECUTION MODE 

In this mode, the program constructed during the editing phase is compiled and, if no errors exist, executed. If 
compilation errors are found, editing mode is restored automatically, and the text area will contain the program 
text just compiled. 

Program execution may be done immediately, using the on-line system in desk calculator fashion. Direct use is not 
possible in the edit mode. 

BASIC OPERATIONS 

The BASIC subsystem provides for the following operations: 

1. Enter a new program and run. 

2. Load an old program and run. 

3. Enter statements and execute directly. 

The BASIC subsystem is entered by typing BA following the executive prompt character (!). The Executive types the 
rest of the word BASIC, gives a carriage return, and then (after a brief pause) the subsystem types its prompt charac- 
ter (>) to indicate that it is ready to receive a command. 

If a BASIC statement is typed (beginning with a valid line number), or if one of the editing commands is typed, the 
editing mode is entered. Subsequent typing of RUN or FAST will effect the compilation and execution mode. If 
program execution is unsuccessful, corrections can be made in the editing mode and execution retried. The com- 
mand CLEAR provides a fresh start, wiping out all previous program statements from the computer memory. It is 
necessary to request RUN or FAST before entering any direct program statements. This may be done upon initial 
entry to BASIC or immediately after a CLEAR command. All BASIC statements to be executed directly are typed 
without line numbers. 

Statement lines of a program may be entered into the computer by typing each line following the prompt character 
(>). All statements except those executed directly must begin with a line number of up to five numeric digits, with 
the total line length not exceeding 85 characters. 

Statements are compiled according to line number. If an existing line has the same number, it will be deleted; fol- 
lowing this, the new statement will be syntax-checked and, if valid, inserted. If it is invalid, it will be deleted 
and a BASIC diagnostic message will be typed. 

COMPILATION AND EXECUTION 

Upon the command RUN ©, compilation of the program begins. FAS[jj® causes compilation in the fast mode with- 
out diagnostics. If compilation is successful, the program is executed. 

Should the program require input from the terminal, the character "?" will be typed during execution to prompt each 
line of input. 
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When execution has been completed, the subsystem again prompts with ">". At this point, either further editing 
operations may be performed, or a CLEAR command may be given followed by statements for direct "desk calculator" 
operations. 

DIRECT EXECUTION OF STATEMENTS 

Statements for direct execution must be typed without line numbers. Any valid BASIC statement may be used 
except the following. 

DATA PRINTUSING 

DEF FOR 

DIM NEXT 

Image Any statement containing ON 

Direct execution is especially useful for on-line debugging and verification. By preceding a BASIC program with a 
STOP instruction and then giving a RUN command, the user may effect compilation and obtain any diagnostic mes- 
sages prior to attempting program execution. The user may then test a selected portion of the compiled program, for 
example, by typing a GOTO statement while still in the direct mode. Execution will proceed to the next STOP, 
PAUSE, or END statement (unless execution is aborted due to an error condition). 
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Figure 4-1. BASIC Editing Commands (and Page Numbers) 
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CLEAR (Erase Text Area) 



CLEAR causes everything in the text editing area to be erased. It should be used if the current program is to be 
deleted in its entirety. 



>CLE[AR]© 



Example: 



i B as n 

>10 LET X=2 © 

>20 LET Y=3 © 

>30 LET Z=5 © 

>CLE © 

> 



In this example, the command "CLE" causes 
lines 10, 20, and 30 to be deleted. 
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DELETE (Delete Lines) 



DELETE causes specified lines to be deleted from fhe text editing area. 



UJ 



line! specifies the num- 
ber of the first line to be 
deleted. 



U 



Iine2 specifies the num- 
ber of the last line (of a 
series) to be deleted. If 
omitted, only line! is 
deleted. 



\ 



\ 



V 










More 


than 


one 


line, 


or 


series 


of r 


nes, 


may 


be 


speci 


: ied. 









>DEL[ETE] Iinel[-line2][,...]© 



Example: 



! BAS IC 

>10 LET X=l© 
>20 LET X=2, Y=3© 
>30 LET Q=X+Y © 
>40 PRINT Q © 
>DEL 10© 
> 



In this example, the command "DEL 10" causes 
line 10 to be deleted. The remainder of the 
program is retained in the text editing area. 
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SYSTEM (Return to Executive] 



SYSTEM causes control to be returned to the BTM Executive. 



>sys[tem]© 



Example: 






! "P AC TP 






: iSAb 1L. 




In this example, the "SYS" command returns 


>LOAD SUMPRO© 




control to the Executive following comple- 






tion of BASIC operations. 


>RUN© 






GR 1 


GR 2 




450 


1761 




520 


1981 




610 


2646 




621 


2696 




788 


2786 




>SYS© 






! 
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LIST (List Lines) 



LIST causes specified lines of a program to be listed on the user terminal. 



UJ 



linel specifies the num- 
ber of the first line to be 
listed. If omitted, the en- 
tire program is listed. 



nr 



Iine2 specifies the num- 
ber of the last line (of a 
series) to be listed. If 
omitted, only linel is listed. 



1 



I 



More than 
series of 
specified. 


one 
ines, 


ine, 
may 


or 

be 


1 









>LIS[T] [linel [-Iine2]][ / ...]© 



Example: 



! BASIC 

>10 LET A=l© 

>15 LET A=A+1© 

>20 IF A<45 THEN 15© 

>LIST 5-15© 

10 LET A=l 

15 LET A=A+1 



In this example, the command "LIST 5-15" 
causes lines 10 and 15 to be listed. The con- 
tents of the text editing area are unaffected. 
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SAVE ON (Save on Temporary File] 



SAVE ON causes specified lines of the current program to be saved in a newly created temporary file. 



UJ 



xname is 1-6 alphanumeric characters en- 

closed by single or double quotes, or 1-6 non- 
biank characters followed by a blank (or by © 
if no line numbers follow). It identifies the 
new file. 



5J 



Iine2 specifies the number of the last line 

(of a series) to be saved. If omitted, only linel 
is saved (if linel has been specified). 



t 

>SAVE[E OJN xname [linel[-line2]] [,. . .]© 



PJ 



linel specifies the number of the first line 

to be saved. If no line number is specified, 
the entire program is saved. 



UJ 



More than one line, or series of lines, may be 
specified. 



Although it is unlikely that the programmer would want to specify a password for a temporary file, a password will 
apply to the file created by a SAVE ON command if a PASSWORD command is currently in effect (see description 
of PASSWORD command). If an account number has been specified, it is reset prior to execution of a SAVE ON 
command and must be respecified if needed for subsequent file operations. 



Example: 



! B AS IC 

>10 INPUT X© 
>20 INPUT Y © 
>30 LET Z=X-Y© 
>40 PRINT Z© 
>50 END© 
>SAVN PROGRM© 
> 



In this example, lines 10 through 50 are saved 
in a temporary file named PROGRM. The 
contents of the text editing area are unaffected. 
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SAVE OVER (Save on Permanent File) 



SAVE OVER causes specified lines of the current program to be saved in a permanent file. The file may have the 
same name as an existing file. 



u 


xname is 1-6 alphanumeric characters en- 


closed by single or double quotes, or 1-6 non- 


blank characters followed by a blank (or by© 


if no line numbers follow). It identifies the 


file in which the program is to be saved. 




' 



'J) 
















ine2 


specifies the 


number of the 


last 


line 


(of 




a series) to be saved. 


If omitted, on 


y 1 


'nel 


is 




saved 


(if linel has been specified). 









>SAV[E OJVER xname[linel[-line2]] [,...]© 

. ) 



or 



linel specifies the number of the first line to 

be saved. If no line number is specified, the 
entire program is saved. 



il 


More than one line, or series of lines, may be 
specified. 



If a PASSWORD command is currently in effect (see description of PASSWORD command), the password will apply 
to the file specified in a SAVE OVER command. If an account number has been specified, it is reset prior to exe- 
cution of a SAVE OVER command and must be respecified if needed for subsequent file operations. 



Example: 



! BASIC 

>10 LET A=2 © 

>20 LET 3=3 © 

>30 LET C=4 © 

>40 LET D=50 © 

>SAVE OVER "XNAY" 10-20,30-40© 

> 



In this example, lines 10 through 20 and 30 
through 40 are saved in a permanent file named 
XNAY. The contents of the text editing area 
are unaffected. 
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FILE (Save on Runfile) 



FILE causes the current program to be saved in the "runfile" maintained by the BASIC subsystem. 



>FIL[E]© 



A program saved via a FILE command replaces the previous contents of the runfile, if any. The saved program can 
be retrieved for later use (see description of "LOAD", "RUN", and "FAST" commands). 



Example: 



! B ASIC 

>10 LET B=5© 

>20 LET C=10© 

>30 LET D=B+C © 

>40 PRINT D© 

>50 END© 

>FILE® 

> 



In this example, steps 10 through 50 are saved 
in the runfile. The contents of the text editing 
area are unaffected. 
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LOAD (Load Program] 



LOAD causes a specified file, containing a previously saved BASIC program, to be retrieved and placed in the text 
editing area. 



UJ 



xname is 1-6 alphanumeric characters en- 

closed by single or double quotes, or 1-6 non- 
blank characters followed by a blank or 
character. It identifies the file to be loaded. 
If omitted, the runfile is assumed. 



> LOA[D] [xname] © 



The contents of the specified file are merged with the previous contents of the text editing area, replacing the con- 
tents of correspondingly numbered lines, if any. If a LOAD command is used in the compilation and execution mode 
(see description of "RUN" and "FAST" commands), the text editing area is cleared prior to loading from the file. 

Note that no compilation is done in response to a LOAD command, and the file loaded must be in standard BASIC 
source format. 



Example: 



! BASIC 

>LOA OLD PRO© 
> 



In this example, the contents of file OLDPRO 
are loaded into the text editing area. 
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EXTRACT (Extract Lines) 



EXTRACT causes everything except specified lines to be deleted from the text editing area. 



E> 



line! specifies the num- 

ber of the first line to be 
extracted. 



Iine2 specifies the num- 
ber of the last line (of a 
series) to be extracted. If 
omitted, only line 1 is 
extracted. 






\ 1 



S) 










More 


than 


one 


line, 


or 


series 


of r 


nes, 


may 


be 


speci 


fied. 









>EXT[RACT] Iinel[-line2] [,...] 






Example: 



! BASIC 

>10 LET X=l© 
>20 LET X=2, Y=3© 
>30 LET Q=X+Y© 
>40 PRINT Q© 
>EXT 20,30-40© 
> 



In this example, line 10 is deleted and lines 
20, 30, and 40 are retained in the text editing 
area. 
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RENUMBER (Renumber Lines] 



RENUMBER causes program steps to be renumbered, starting with a specified line number and renumbering in speci- 
fied increments. 



CJ 



step! specifies the low- 

est new line number. If 
omitted, 100 is assumed. 



£> 


step2 specifies the point 


in the program at which re- 


numbering is to begin. It 


may be specified only if 


stepl is also specified. If 


omitted, line number 1 is 


assumed. 


\ 1 



UJ 



incr specifies the incre- 
ment by which new line 
numbers are to be spaced. 
It may be specified only if 
stepl and step2 are also 
specified. If omitted, the 
value 10 is assumed. 



>REN[UMBER][stepl[,step2[,incr]]]© 



Example: 



! BASIC 

>10 INPUT A © 
>20 INPUT B © 
>30 INPUT C © 
>40 LET P=B+C© 
>50 PRINT P® 
>60 END© 
>REN 10,20,30© 
> 



In this example, steps 20 through 60 are renum- 
bered as lines 10 through 130. The original step 
10 is not renumbered but is replaced by the step 
originally numbered 20. 
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PROCEED (Continue After Escape) 



PROCEED causes BASIC processing to continue after being stopped by use of the © key (see description of Executive 
commands). 



pro[ceed]© 



Since I/O file conditions are not necessarily preserved when processing is interrupted, the resumption of compila- 
tion or program execution may net always be successful. 



Example: 



! BASIC 

>10 LET A=l© 

>20 PRINT A © 

>30 LET A=A+1© 

>40 IF A>4 THEN 60© 

>50 GOTO 20© 

>60 END© 

>RUN® 

_l_ 

_2 

>PR0© 

_4 

> 



In this example, program execution is inter- 
rupted by an Escape and then resumed by use 
of the PROCEED command. 
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NAME (Name Runf ile] 



NAME causes a specified name to be given to the runfile. 



name is 1-6 alphanumeric characters en- 

closed by single or double quotes, or 1-6 non- 
blank characters followed by a blank or © 
character, It specifies the name that is to be 
given to the runfile. If no name is specified, 
an/ name given to the runfile by a previous 
NAME command may no longer be used to ref- 
erence the file. 



>NAM[E][name]© 



Example: 



! BAS IC 

>10 LET C=3© 

>20 PRINT C© 

>30 END© 

>FILE © 

>CLEAR © 

>NAME "RUNFIL"© 

>LOAD RUNFIL© 

> 



In this example, the program created at the 
console is stored in the runfile, and the text 
editing area is cleared. The runfile is given 
the name RUNFIL and then the program is re- 
turned to the text editing area via a LOAD 
command. 
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PASSWORD (Set/Reset Password) 



PASSWORD causes a specified password to be established for use in subsequent SAVE ON, SAVE OVER, LOAD, 
RENUMBER, RUN, or FAST file operations. If a null password is specified, any previous password is reset. 



EU 



string is 1-7 nonblank characters. It speci- 

fies the password that is to be used in subsequent 
file operations. A null string cancels a previ- 
ously established password. 



> PASSWORD] [string]© 



A password is not used in runfile operations, and such operations (e.g., FILE or LOAD) cancel any previously es- 
tablished password. 



Example: 



! BAS IC 


In this example, the password SECRIT is given 


>10 LET C=99© 


to file AFILE and a return to the BTM Execu- 




tive is made. BASIC is then called and the 


>20 PRINT C© 


password reestablished to allow AFILE to be 


>30 END© 


loaded into the text editing area. 


>PASSWORD SECRIT© 




>SAWER AFILE© 




>SYS® 




! BASIC 




>PAS SECRIT © 




>LOAD AFILE © 




> 
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ACCOUNT (Set/Reset Account] 



ACCOUNT causes a specified account identifier to be established for use in reading files from an account other than 
the current one. If a null identifier is specified, any previously established identifier is reset. 



GT 



string is 1-7 nonblank characters. It identifies 

the account from which a file is to be read. A null 
string cancels a previously specified identifier. 



>ACC[OUNT] [string]© 



Since BASIC does not allow files to be written outside the log-in account, SAVE ON or SAVE OVER operations re- 
set any account identifier. 



Example: 



! BAS IC 

>ACC :SYS© 
>LOAD SUMFIL© 
>SAVN TFIL© 

,>CLJL© 

>ACC :SYS© 
>LOAD ANOTHR© 
> 



In this example, account :SYS is specified as 
the account from which file information is to 
be read. Since the command "SAVN TFIL" 
resets the account identifier, it must be speci- 
fied again before reading another file. 
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ENTER BASIC (Set/Reset Precision) 



ENTER BASIC causes the extended precision print indicator to be set or reset. 



® ~ 

L specifies that extended (i.e., long) precision 
values are to be output. If L is omitted, the ex- 
tended precision print indicator is reset (the default 
condition). 



>ent[er basic] [l]© 



Example: 



IDAC TO 
i JJJ IO lb 

>LOAD PIE© 
>ENT L© 
>RUN© 
3.1415926535897932 



In this example, the output of the program 
PIE is printed with extended precision. 
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WIDTH (Set Print Width) 



WIDTH causes the print width to be changed from the default value of 72. 



UJ 



digits specifies the desired print width. The 
specified value must not be less than 32 or greater 
than 85. 



>WID[TH]digits © 



Example: 



! BASIC 

>LOAD XYZ© 

>WID 35© 

>RUN© 

'TWAS BRILLIG, AND THE SLITHY TOVES 
DID GYRE AND GIMBLE IN THE WABE ; 



In this example, print width is set at 35, 
causing a single text string to be printed 
in two lines. 
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STATUS (Give Status] 



STATUS causes the status of the current program to be printed. One of three responses is possible: EDITING, COM- 
PILING, or RUNNING. If program execution is in progress, an ESCAPE (i.e., © ©) must be used before the 
STATUS command can be keyed in. The line number of the current statement is printed preceding the RUNNING 
message. 



>sta[tus]® 



Example: 



! BAS IC 


In this example, the message "30 RUNNING" 


>10 LET K=l © 
>20 PRINT K© 


indicates that program execution was inter- 
rupted at step 30. 


>30 LET K=K+1© 




>40 IF K>4 60© 




>50 GOTO 20© 




>60 END© 




>RUN© 




_l_ 




_2_ 




_3 ©@ 




>STA© 




30 RUNNING 




>PR0© 




_4 




> 
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RUN (Compile, Check, and Run] 

RUN causes BASIC to compile a program from the runfile or from the text editing area if no runfile exists. If no 
errors are found, the program is then executed. 



>RUN© 

If no program exists in the runfile or the text editing area when the RUN command is used, BASIC compiles and exe- 
cutes unnumbered statements directly as they are input from the console. However, the following types of BASIC 
statements cannot be executed directly and must not be used in the direct execution mode: 

DATA PRINTUSING 

DEF FOR 

DIM NEXT 

Image Any statement containing "ON" 

Compilation takes place in the "safe" mode in which the subscripts of all variables are checked against absolute di- 
mensions. If input is required from the console during execution, BASIC types a question mark as a prompt character. 
When program execution is complete, the usual ">" prompt is typed. 



Examph 



! B AS IC In this example, the program in the text editing 

, ~ TTnm . r/ -x area is executed, causing the character "5" to 

>10 LET A=5© I . . 

— be printed. 

>20 PRINT A© 

>30 END© 

>RUN© 

_5 

> 
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FAST (Compile and Run) 

FAST causes BASIC to compile a program from the runfile or from the text editing area if no runfile exists. The 
program is then executed. 



"> 



fas[t] © 



If no program exists in the runfile or the text editing area when the FAST command is used, BASIC compiles and 
executes unnumbered statements directly as they are input from the console. 

However, the foiiowing types of BASIC statements cannot be executed directly and must not be used in the direct 
execution mode: 

DATA PRINTUSING 

DEF FOR 

DIM NEXT 

Image Any statement containing "ON" 

When compilation takes place in the "fast" mode, no subscript checking is done (see description of RUN command), 
If input is required from the console during execution, BASIC types a question mark as a prompt character. When 
program execution is complete, the usual ">" prompt is typed. 



Example: 



! B AS lC In this example, a program is executed in the 

„.„ ^ direct mode as it is input from the console, 
>FAST ® r 

~ causing the character "4" to be printed. 

>LET B=4© 



>PRINT B© 

_4 

> 
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BASIC MESSAGES 



Message 


Meaning 


xxxxxx LINE * ERROR 


The indicated line number is too long. The line must be retyped 
with a number less than six digits in length. 


LINE TOO LONG 


More than 85 characters were typed on one line. The line must 
be retyped using fewer characters. 


SPACE LIMIT NEAR 


Not more than 500 characters may be added to the program In the 
text editing area. 


PROGRAM TOO LARGE 


No lines may be added to the program in the text editing area. 
The contents of this area may be saved in a file and the text 
editing area may then be cleared to allow more lines to be 
created. (See descriptions of FILE, SAVE ON, SAVE OVER, 
and CLEAR commands. ) 


NO PROGRAM 


A specified line or series of lines does not exist in the text 
editing area. The user may type in the missing information. 


ILLEGAL LOAD 


An illegal line has been encountered in loading a program into 
the text editing area. The line, printed prior to this message, 
must be retyped correctly. 


UNABLE TO OPEN 


A specified file does not exist or cannot be accessed for some 
other reason (e.g., Incorrect password). 


ILLEGAL 


A RENUMBER command has been encountered with illegal syntax. 
The command must be retyped with proper syntax. 


RUN? ILLEGAL 


A direct statement was encountered while in the editing mode. 
The RUN or FAST command may be used to enter the compilation 
and execution mode. 
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5. EDIT SUBSYSTEM 



GENERAL 

With the EDIT subsystem, the on-line user may enter data from the terminal and build files on the RAD. Records . 
may be added to and deleted from files and changes may be made within records. EDIT may be used with files of 
source language for processors such as BASIC, FORTRAN, Symbol, etc., and with job control statements for termi- 
nal batch job entry. The EDIT subsystem enables the following: 

1. Creation of sequence-numbered files on the RAD. 

2. Deletion of one or more records from an existing file. 

3. Insertion of single records or series of records into an existing file. 

4. Replacement of single records or series of records with new records. 

5. Reordering records and record groups within a file. 

6. Changes within any record in a file. To facilitate this, there is a group of commands to substitute, insert, and 
shift strings of characters within a record. 

7. Copying an existing file. 

EDIT COMMANDS 

The EDIT subsystem is entered through a command to the Executive which, in turn, completes the word, then passes 
control to the subsystem. On the following line, EDIT types an asterisk which is the prompt character for all EDIT 
commands. 

There are three types of EDIT commands, arranged in a hierarchical relationship (see Figure 5-1). 

1. File Commands: Commands that apply to an entire file. 

2. Record Commands: Commands that act upon one record or a group of records within a file. 

3. Intra-Record Commands: Commands that make changes within an individual record. These generally manipu- 
late character strings within a specific record. 

RECORD COMMANDS 

Every record in a file contains a unique sequence number, and sequence numbers are referenced in the execution of 
many commands that operate on records and groups of records. Sequence numbers have an implied decimal point and, 
when listed by the Editor, are displayed with three decimal places (e.g., 20.000). 

INTRA-RECORD COMMANDS 

Note that before any commands that do operations within individual records may be typed, either SS, ST, or SE 
must be given to specify the starting record sequence number. Also, multiple intra-record commands may be typed 
on a line separated by semicolons (;). 

FILE RECORD FORMAT 

All file records handled by EDIT are from 1 to 140 characters long. All records are ordered in the file according to 
sequence number, which is the key by which records are specified in EDIT commands. If EDITisused tobuilda file, 
successive sequence numbers will be automatically assigned. If it is desired to use EDIT with differently formatted 
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Figure 5-1. EDIT Commands (and Page Numbers) 
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files, it is necessary to use the COPY command to create a copy of the file with sequence numbers in correct for- 
mat; in the event that this is necessary, a message will be typed. Since EDIT commands make immediate changes 
to the actual records in a file, it is advisable to make a backup copy of any file being updated in the event erro- 
neous commands cause loss of data. 

EDIT MESSAGES 

There are a number of messages that the EDIT subsystem may return to the operator in the course of executing com- 
mands. Table 5-1 lists the conventions that are observed with the various messages. 



Table 5-1. EDIT Message Conventions 



Convention 


Description 


Example 


. .(message) 


Messages preceded by two periods give comments on 
the progress of operations. They do not indicate un- 
usual or error conditions 


.. COPY DONE 

A COPY operation has been 

completed. 


— (message) 


Messages preceded by two hyphens indicate an un- 
expected event of which the operator should be 
aware. The command did not abort, but completed 
operations to whatever extent was possible. 


—EOF HIT 

An end-of-file was 

encountered. 


-(message) 


A single hyphen indicates an error condition which 
causes the present command to be aborted, and no 
action will be taken on further commands typed on 
the same line. 


-C4P1: NO SUCH REC 
The first parameter of the 
fourth command referenced a 
nonexistent record. 
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BUILD (Create a New File) 



BUILD causes the Editor to create a new file in disc storage. 



nr 



f identifies the file to be created. It con- 

sists of 1-31 alphanumeric characters (i.e., 
A-Z, 0-9, *, $, *, -, %, :, @, on_j). 



UJ 



n specifies the sequence number of the first 

record in the new file. If omitted, 1,000 is 
assumed. 



*BUILDf[([a][,p])][,n[,i]]e 



f 



t 



m 



p specifies the password associated with the 

new file. It consists of 1-8 alphanumeric char- 
acters. If omitted, no password will be required 
to access the new file. 



E> 



i specifies the value by which sequence num- 

bers for the new file are to be incremented. This 
may be specified only if n is also specified in 
the command. If i is omitted, 1.000 is assumed. 



Following the BUILD command, the system prompts by typing a sequence number. The user then types in the first 
line of the new file. Each line comprises a record of up to 140 characters and is terminated by a carriage return. 
A null record, consisting of only a carriage return, terminates the action of the BUILD command. 



Example: 



*BU ILD ALPHA-RALPHA ,10,2© 
10.000 SYSTEM SIG7® 



12.000 DEF 


B© 


14.000 REF 


A© 


16.000 B 


A© 


18.000 END© 




20.000 © 





In this example, the user creates file ALPHA- 
RALPHA comprising five records numbered 
10.000 through 18.000 (null record 20.000 
does not appear in the file). 
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END (Exit to Executive) 

END causes the Editor to close all active files and return control to the Executive. 

*END(R) 



Exampl< 



£END © The exclamation character on the line fol- 

lowing the END command indicates that the 

— Editor subsystem has returned control to the 

Executive. Any Executive command may 
then be given. 
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COPY (Copy a File) 



COPY causes the Editor to copy a specified file. 



UJ 



fidl =fl[([al][,pl])] 



fl is 1-31 alphanumeric characters (i.e., 

A-Z, 0-9, # , $, *, %, :, -, @, ori_j). It 
identifies the file to be copied. 



a] is 1-8 alphanumeric characters. It 

specifies the account containing file fl . If 
omitted, the log-in account is assumed. 



pi is 1-8 alphanumeric characters. It 

specifies the password of file fl . If fl has 
no password, pi is omitted. 



or 



fid2 = f2[(,p2)] 



(0 



1-31 alphanumeric characters. It iden- 



tifies the file to be replaced. 



p2 is 1 -8 alphanumeric characters. It 

specifies the password of file f2. If f2 has no 
password, p2 is omitted. 



*COPY fidl {£" 1 fid2[,n[,i]]@ 



GT 



ON specifies that a 

new file is to be created 
containing the informa- 
tion copied from fl . ON 
may not be specified if a 
file named f2 exists in the 
log-in account. 



OVER specifies that if 

a file named f2 exists it will 
be deleted and replaced by 
the new file. 



37 








n 


specifies 


the 


sequence 


number of the 


first 


record in 


th 


e new file. 


If omitted, 


1. 


000 is assumed. 





07 



specifies the value by 
which sequence numbers for 
the new file are to be in- 
cremented. This may be 
specified only if n is also 
specified. If i is omitted, 
1 .000 is assumed. 



Example: 



*C0PY PELION ON 0SSA(,HUSH)@ 
. .COPYING 
. .COPY DONE 



In this example, the information from the file 
named PELION is copied to a new file named 
OSSA. The password HUSH is associated with 
the new file. 
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DELETE (Delete a File) 



DELETE causes the Editor to delete a specified file from the log-in account. 



m 



f identifies the file to be deleted. It con- 
sists of 1-31 alphanumeric characters (i.e., 
A-Z, 0-9, #, $, *, -, %, :, @, or.—.). 



r£ 



p specifies the password associated with the 
file that is to be deleted. It consists of 1-8 
alphanumeric characters. If the file has no pass- 
word, this parameter is omitted; otherwise, it 
must be included. 



^DELETE f[([a][, P ])] 



Example: 



''-DELETE SUPERNUMERARY*;, COVERT)© 
. . DELETED 



In this example, the file SUPERNUMERARY 
having the password COVERT is deleted from 
the log-in account. 
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EDIT (Edit a File) 



EDIT causes the Editor to open a specified file for editing. 



DJ 



f identifies the file to be edited. It con- 

sists of 1-31 alphanumeric characters (i.e., 
A-Z, 0-9, #, S, *, -, %, :, @, orU 



5J 



p specifies the password associated with the 
file to be edited. It consists of 1-8 alphanu- 
meric characters. If the file has no password, 
this parameter is omitted; otherwise, it must be 
included. 



rr 



*crMT cH _\1 £2\ 
ui^ii ii\,p/j ^y 



The EDIT command must be used to enter the record editing mode and to identify the file that is to be edited. The 
following commands may be used in the record editing mode: IN, TY, TC, TS, DE, FD, FT, MD, MK, RN, CM, 
SS, and ST. Use of any of the following commands terminates the record editing mode: BUILD, DELETE, and 
COPY. If an EDIT command is given while in the record editing mode, the previously open file is closed and the 
specified file is opened. 



Example: 



*EDIT PLOWBOYC, BUCOLIC)© 



In this example, the file named PLOWBOY 
having the password BUCOLIC is opened for 
editing. Any previously opened file is closed. 
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MERGE (Transfer Records) 



MERGE causes the Editor to transfer records between specified files. 



37 



fidl=fl[([ol][,pl])] 



fl is 1-31 alphanumeric characters (i.e., 

A-Z, 0-9, #, $, *, %, :, @, -, or^). It 
identifies the file from which records are to 
be transferred. 



al is 1-8 alphanumeric characters. It 

specifies the account containing file fl. If 
omitted, the log-in account is assumed. 



pi is 1-8 alphanumeric characters. It 

specifies the password of file fl. If fl has 
no password, pi is omitted. 



157 



Hd2=f2[(,p2)] 



f2 is 1-31 alphanumeric characters. It iden- 

tifies the file to which records are to be 
transferred. 



p2 is 1-8 alphanumeric characters. It speci- 

fies the password of file f2. If f2 has no pass- 
word, p2 is omitted. 



*MERGE fidl[,rangel] INTO fid2,range2[,i] 

1 . t 



CD 



range 1 = nl [-mlj 



nl is the number of the 

first record to be transferred. 
If omitted, the entire file is 
transferred. 



ml is the number of the 

last record to be transferred. 
If omitted, only nl (or else 
the entire file) is transferred. 



rang 


e2 = n2 


[-m2] 


n2 is the number of the 
first record to be deleted 
from file f2. This param- 
eter must be specified. 


m2 is the number of the 
last record to be deleted 
from file f2. If omitted, 
only n2 is deleted. 



137 



i specifies the value by 

which sequence numbers are 
to be incremented. If omit- 
ted, 1.000 is assumed. 



If file fl does not exist, contains no records within the specified range, or is not in keyed format, the command is 
aborted. If file f2 does not exist in the log-in account, the Editor creates such a file containing the specified 
records. 



Examph 



EMERGE NULL INTO VOID, 100-125 ® 
. .MERGE STARTED 
--DONE AT 120 



In this example, file NULL comprising 21 
records is transferred to file VOID beginning 
at sequence number 100.000 and continuing 
through sequence number 120.000. Any 
records in file VOID within the range 120.001 
through 125.000 are deleted. 
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CR (Suppress Terminator] 



CR controls the inclusion of the new-line character (X'15 1 ) that normally terminates records created by the Editor. 



UJ 



ON specifies that the X'15' terminator is not to 

be suppressed. This is the default condition when- 
ever the Editor subsystem is entered. 



fOKM 

— lOFrj ~ 



W 

OFF specifies that the X'15 1 terminator is to 

be suppressed on any records created by the Editor. 



Example: 



*BUILD NEWFILE© 

1.000 H ICKORY © 

2.000 D ICKORY© 

3.000 D OCK© 

4.000 © 

*EDIT NEWFILE© 

*TS 1-3© 

HICKORY 

DICKORY 

DOCK 



In this example, the fiie NEWFILE is created 
without the inclusion of new-line characters 
at the end of each record. Note that this has 
no effect on the typing of records by the Tele- 
type. However, records output to paper tape 
would be affected. 
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BP (Set Blank Preservation Mode) 



BP sets the blank preservation mode on or off. 



O 



ON specifies that all strings of blanks are to 

be preserved during intra-record operations. 



*BP 



ON 
OFF. 



or 



OFF specifies that strings of blanks are not to 

be preserved, but are to be compressed to a single 
blank (minimum) or expanded as required to main- 
tain the alignment of nonblank fields during edit- 
ing operations. This is the default when the 
Editor is entered. 



Example: 



*EDIT OLDFILE © 
*SE 99;TS © 

B $+3 
*/B/S/BNEZ/;TS © 

BNEZ $+3 



*BP ON© 
*SE 99 © 
*/BNEZ/S/B/;TS© 
B $+3 



In thisexample, record 99.000of file OLDFILE 
originally has two blanks between nonblank 
fields. When the string "B" is replaced by 
"BNEZ", string "$+3" is shifted right 2 col- 
umns, compressing the intervening blank field 
to a single column. When "BNEZ" is replaced 
by "B" with blank preservation in effect, the 
single blank is preserved. 



EDIT Subsystem 



5-11 



IN (Insert Records) 



IN causes the Editor to insert records into a file that has been opened for editing (via an EDIT command). 



or 



n is the sequence number to be given to the 

first record inserted into the file. 



*tm ~f":l^ 



fU 



i specifies the value by which sequence num- 

bers of successive records are to be incremented. 
If omitted, the increment value specified in the 
most recent record editing command is used. If 
no such commands have been given, the value 
1. 000 is assumed. 



New records are inserted beginning with record n. If a record with sequence number n already exists in the file, 
it is replaced by the newly inserted record. Note that existing record n is the only record that may be replaced 
in this way. If a subsequently inserted record would equal or exceed the sequence number of an existing record, 
the IN command is terminated and the console bell is rung. 

The Editor prompts the user console with the sequence number of each record to be inserted. A null record (car- 
riage return only) terminates the command. 



Example: 



*EDIT ANYFILE © 
*IN 10,. 5 © 
10.000 L I.R3 X'Fl'© 
10.500 S TW,R3 ONE © 



In this example, existing record 10.000 of file 
ANYFILE is replaced by a new record typed by 
the user. New record 10. 500 is also inserted 
into the file. Because a record with sequence 
number 1 1. 000 already exists, the command 
terminates and the bell is rung. ANYFILE re- 
mains open for further editing. 
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IS (Insert Records Without Prompt) 



IS causes the Editor to insert records into a file that has been opened for editing (via an EDIT command), 



n is the sequence number to be given to the 
first record inserted into the file. 


'f 



*IS n[,i] 

t 



w 



i specifies the value by which sequence num- 

bers of successive records are to be incremented. 
If omitted, the increment value specified in the 
most recent record editing command is used. If 
no such commands have been given, the value 
l c 000 is assumed. 



New records are inserted beginning with record n. If a record with sequence number n already exists in the file, 
it is replaced by the newly inserted record. Note that existing record n is the only record that may be replaced 
in this way. If a subsequently inserted record would equal or exceed the sequence number of an existing record, 
the command is terminated and the console bell is rung. 

The Editor does not prompt the user console with the sequence number of each record to be inserted. A null record 
(carriage return only) terminates the command. 



Example: 



*EDIT ANYFILE© 
*IS 10,. 5© 
LI,R3 X'Fl'® 
STW,R3 ONE © 



In this example, existing record 10.000 of file 
ANYFILE is replaced by a new record typed by 
the user. New record 10. 500 is also inserted 
into the file. Because a record with sequence 
number 11.000 already exists, the command 
terminates and the bell is rung. ANYFILE re- 
mains open for further editing. 
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TY (Type Records] 



TY causes the Editor to type specified columns of one or more records in the currently open file. 



DJ 



n specifies the sequence number of the first 

record to be typed. 



c specifies the column number of the first 

character that is to be typed. If omitted, the 
entire record is typed. 



*TY n[-m][,c[,d]] 

t 



® 



m specifies the upper limit of the range of 
sequence numbers within which records are to 
be typed. If omitted, only record n is typed. 



d specifies the column number of the last 

character that is to be typed. It may be in- 
cluded only if c is also specified. If omitted, 
only the character in column c is typed (or 
the entire record, if c is omitted also). 



There is also an intra-record form of this command (see page 5-4). 



Example: 



2JLUJ.I auUKUfiJP 1L.J1 i«3 

*TY 1-2,4,8© 
1.000 EQU 



1.200 



1.400 



1.600 



1.800 



SYST 



In this example, the characters in columns 
4 through 8 of all records in the sequence 
number range 1-2 of file SOURCEFILE are 
typed following the sequence number of each 
record. 



REF 



DEF 



PAGE 



2.000 ITIAL 
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TC (Type Compressed] 



TC causes the Editor to type specified columns of one or more records in the currently open file. Any nonblank 
strings within the columns typed are shifted to the left to compress any blank strings to a single blank. This com- 
pression affects only the typed output; the records themselves are not affected. 



w 



n specifies the sequence number of the first 

record to be typed. 



EJ 



c specifies the column number of the first 

character that is to be typed. If omitted, the 
entire record is typed. 



*TC n[-m][,c[,d]] 

t 



w 



m specifies the upper limit of the range of 
sequence numbers within which records are to 
be typed. If omitted, only record n is typed. 



d specifies the column number of the last 

character that is to be typed. It may be in- 
cluded only if c is also specified. If omitted, 
only the character in column c is typed (or the 
entire record, if c is omitted also). 



Example: 



*EDIT SOURCEFILE® 
*TC 1-2,1,7© 
1.000 A EQU 
1.200 SYS 
1.400 B REF 
1.600 C DEF 
1.800 PAG 
2.000 *INITIA 



In this example, character strings found in col- 
umns 1 through 7 of records 1 through 2 of file 
SOURCEFILE are typed, in compressed format, 
following the sequence number of each record. 
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TS (Type Without Sequence] 



TS causes the Editor to type specified columns of one or more records in the currently open file. Its function is 
similar to TY, except that sequence numbers are not typed for each record. 



E> 



n specifies the sequence number of the first 

record to be typed. 



37 



c specifies the column number of the first 

character that is to be typed. If omitted, the 
entire record is typed. 



*TS n[-m][ ; c[,d]] 

_J f 



H> 



m specifies the upper limit of the range of 

sequence numbers within which records are to 
be typed. If omitted, only record n is typed. 



G7 



d specifies the column number of the last 

character that is to be typed. It may be in- 
cluded only if c is also specified. If omitted, 
only the character in column c is typed (or the 
entire record, if c is omitted also). 



There is also an intra-record form of this command (see page 5-39). 



Example: 



*EDIT SOURCEFILE^ 
*TS 1-2,1,7© 
A EQU 
SYS 



In this example, the characters in columns 1 
through 7 of all records in the sequence num- 
ber range 1-2 of file SOURCEFILE are typed 
without the sequence number of each record. 



B REF 



DEF 



PAG 



•INITIA 
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DE (Delete Records) 



DE causes the Editor to delete, in the currently open file, all records whose sequence numbers lie in a specified 
range. 



E> 



n specifies the lower limit of the range of se- 

quence numbers in which records are to be deleted. 
This parameter must be specified. 



DE n[-m]@ 



E> 



m specifies the upper limit of the range of se- 
quence numbers in which records are to be deleted. 
If omitted, only record n is deleted. 



Example: 



*EDIT SOMEFILE© 
*DE 25-30© 



In this example, any records in the range 
25.000 through 30.000 of the file SOMEFILE 
are deleted. The file remains open for further 
editing. 
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FD (Find and Delete) 



FD causes the Editor to search a given range of records (in the currently open file) for a specified character string 
between designated columns. Any records within the affected range that contains the specified character string 
within the designated columns is deleted from the file. 



® 



specifies the sequence number of the first 
record to be searched. 



0J 



string is the character string identifying the 

record or records to be deleted. 



*FD n[-m],/string/[,c[,d]]@ 



w 



m specifies the sequence 

number of the last record to 
be searched. If omitted, only 
record n is searched. 



J 



L 



c specifies the first col- 

umn of the field to be 
searched. If omitted, col- 
umn 1 is assumed. 



d specifies the last col- 
umn of the field to be 
searched. It may be speci- 
fied only if c is also speci- 
fied. If d is omitted, the 
value 140 is assumed. The 
field c through d must be 
large enough to contain the 
specified string, and the value 
of d must be greater than 
that of c. 



Example: 



*FD 10-20,/CW,R7/,10,14© 
--002 RECS DLTED 



In this example, the Editor deletes from file 
SOMEFILE two records located within the range 
of sequence numbers 10.000 through 20.000 
and containing the string "CW,R7" in columns 
10 through 14. 
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FT (Find and Type) 



FT causes the Editor to search a given range of records (in the currently open file) for a specified character string 
between designated columns. The Editor will type the sequence number of each record satisfying the search criteria. 



W 



n specifies the sequence number of the first 

record to be searched. 



® 



string is the character string identifying those 

records whose sequence numbers are to be typed. 



r 

*FT n [-m] ,/string/[,c[,d]] © 



J 



® 



m specifies the sequence 
number of the last record to 
be searched. If omitted, 
only record n is searched. 



1 



c specifies the first col- 

umn of the field to be 
searched. If omitted, col- 
umn 1 is assumed. 



W 



d specifies the last col- 

umn of the field to be 
searched. It may be speci- 
fied only if c is also speci- 
fied. If d is omitted, the 
value 140 is assumed. The 
field c through d must be 
large enough to contain the 
specified string, and the 
value of d must be greater 
than that of c. 



Example: 



*EDIT SOMEFILE© 

*FT 10-20, /BE/, 10, 11 © 

15.000 



In this example, the Editor types the sequence 
number 15.000, indicating that the string "BE" 
in columns 10 through 11 was found only in 
one record within the range 10.000 through 
20.000 in file SOMEFILE. 
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MD (Move and Delete Records) 

MD causes the Editor to delete all records in a specified range and to then move records in another range into this 
area. The two ranges must not overlap. 



E> 



n specifies the sequence number of the first 

record that is to be moved. 



157 



k specifies the lower limit (i.e., the se- 

quence number) of the range of records to be 
deleted. 



*md nr-mi,i<r-pir,n® 



A 

J 



1 

L 



07" 



m specifies the sequence 

of the last record that is to 
be moved. If m is omitted, 
only record n is moved. 



37 



p specifies the upper 
limit of the rnage of rec- 
ords to be deleted. If p is 
omitted, only record k is 
deleted. 



i specifies the incre- 

ment value to be used in re- 
numbering records. If i is 
omitted, the most recent in- 
crement value specified in 
a record edit command is 
used (or 1, if no increment 
value has been specified 
thus far). 



The first record (record n) is renumbered as record k. Successive records from the range n through m are renumbered 
consecutively higher, with increment i. As each record from the range n through m is moved, that record is deleted 
from the original area. At the end of this operation, a message is printed specifying the new sequence number of 
the last record moved from the range n through m. 



Example: 



*MD 5-21, 100-101,. 02(e) 
--DONE AT 100.32 



In this example, records 100 through 101 are 
deleted and records in the range 5 through 21 
are moved to that area. The 17 records moved 
are renumbered 100.000 through 100.320, in 
increments of .020. 
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MK (Move and Keep) 



MK causes the Editor to delete, in the currently open file, all records in a specified range and to then move records 
in another range into this area. Its action is similar to MD, except that records in the range n-m are not deleted as 
they are moved. 



® 



n specifies the sequence number of the first 
record that is to be moved 



W 



k specifies the sequence number designating 

the lower limit of the range of records to be 
deleted. 



r 

^MK n[-m],k[-p][,i]® 



® 



m specifies the se- 
quence number of the last 
record that is to be moved. 
If omitted, only record n 
is moved. 



EJ 



p specifies the sequence 
number designating the upper 
limit of the range of records 
to be deleted. If omitted, 
only record k is deleted. 



W 



1 specifies the incre- 

ment value to be used for 
renumbering records. If 
omitted, the most recent 
increment value specified 
in a record edit command is 
used (or 1, if no such value 
has been specified). 



Example: 



*EDIT AFILE© 
*MK 1,20® 
--DONE AT 20.000 



In this example, record 1.000 of file AFILE is 
moved to sequence number 20. 000 but is not 
deleted from its original location. 
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RN (Renumber Record] 



RN causes the Editor to renumber a specified record of the currently open file, deleting it from its old location. 



® 



n specifies the sequence number of the record 

that' is to be renumbered. Record n must exist. 



*RN n,k© 



E> 



k specifies the sequence number that is to be 

assigned to the record currently numbered n. Rec- 
ord k must not exist prior to this command. 



Example: 



^EDIT THISFILE.© 
*RN 10,20.1© 



In this example, record 10.000 of file THISFILE 
is renumbered 20. 100 and moved to the corre- 
sponding location in the file. 
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CM (Commentary] 



CM causes the Editor to insert commentary into specified columns of each successive record of the currently open file, 
beginning at a specified sequence number. 



E 



n specifies the sequence number of the first 

record into which commentary is to be inserted. 



*CM n,c ® 



w 



c specifies the column number at which the in- 
serted commentary is to begin in each record. 



The Editor prompts with the sequence numbers of successive records, beginning with record n. The user types the 
desired commentary following each sequence number. A null record (carriage return only) terminates the commanc 



Example: 



*EDIT AFILE© 

*CM 20,30© 

20.000 R ETURN ADDR © 

20.100 S UBR ENTRY© 

21.000 R EAD NXT RCD © 

22.000 © 



In this example, commentary is added to records 
20.000, 20.100, and 21.000 of file AFILE. 
Commentary begins at column 30 in each record. 
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SS (Set and Step) 



SS causes the Editor to start at a specified record in the currently open file and proceed to each record in succession, 
accepting one line of intra-record commands to update the current record. 



:o 










n 




specifies 


the 


sequence 


numb 


Br of the 


first 


recora 


to 


be 


edited. 







E> 



c specifies the leftmost 

column in which editing may 
be done. If omitted, intra- 
record commands will apply 
to columns 1 through 140. 



I If ! 



5) 



d specifies the rightmost 

column in which editing may 
be done. It may be speci- 
fied only if c is also speci- 
fied. If omitted, the value 
140 is assumed. 



Intra-record commands are applicable only to characters and strings of characters within the specified column limits 
of each record. Characters outside these limits may not be examined by intra-record commands. 

The Editor prompts by typing the sequence number of each record in succession, followed by a double asterisk. The 
user may then type a line of infra-record commands to be applied to the current record. The SS command is termi- 
nated by typing a null record (carriage return only) following the double asterisk. 



Example: 



*EDIT THISFILE® 

*SS 1® 

1.000** /BE/S/BEZ/^) 

2_JD00**_/F:/S/M:/© 

2.500** ( ft) 



In this example, records 1.000 and 2.000 of file 
THISFILE are edited by intra-record commands 
following use of the SS command. The SS com- 
mand is then terminated by a null record follow- 
ing the typing of sequence number 2. 500. 
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ST (Set, Step, and Type) 



ST causes the Editor to start at a specified record in the currently open file and type each record in succession, ac- 
cepting one line of intra-record commands to update the current record. 



ET 



n specifies the se- 

quence number of the 
first record to be edited. 



® 



c specifies the leftmost 

column in which editing 
may be done. If omitted, 
intra-record commands will 
apply to columns 1 through 
140. 



UJ 



d specifies the rightmost 

column in which editing may 
be done. It may be speci- 
fied only if c is also speci- 
fied. If omitted, the value 
140 is assumed. 



;ST n[,c[,d]]@ 



Intra-record commands are applicable only to characters and strings of characters within the specified column limits 
of each record. Characters outside these limits may not be examined by intra-record commands. 

The Editor types each record in full, following the sequence number, and then prompts by typing a double asterisk 
on the following line. The user may then type a line of intra-record commands to be applied to the current record. 
The action of an ST command is terminated by typing a null record (carriage return only) following the double asterisk. 



Example: 



*EDIT SOMEFILE © 

*ST 6,8,16© 

6.000 DEL22 BAL,R15 EXNEXT 



** /R15/S/R10/© 
7.000 B 



In this example, record 6.000 of file SOMEFILE 
is edited by an intra-record command following 
use of the ST command. Records 7. 000 and 
8.000 are also displayed but not altered. The 
ST command is terminated by a null record fol- 
lowing the display of record 8.000. 



DEL26 



**_N0© 

8.000 DEL14 BAL,R15 CBINT 

** © 
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SE (Set Intra-Record Mode] 



SE causes the Editor to accept successive lines of infra-record commands that are to be applied to a specified range 
of records in the currently open file. 



EJ 



n specifies the lower limit of'the range of 

records to be edited. 



P 



c specifies the leftmost column that may be 

edited. If omitted, column 1 is assumed. 



*SE n[-m][,c[,d]] 

f 



:o 










m 


specifies the u 


pper 


limit of the 


range of 


re 


cords to be edited. 


If omitted, on 


y record 


n 


is edited. 









w 



d specifies the rightmost column that may be 

edited. It may be specified only if c is also 
specified. If omitted, column 140 is assumed. 



Intra-record commands input following an SE command are applied, in order, to each record in the range n through 
m. If several commands are entered on one line, all of the commands on that line are executed and applied to the 
current record before the next record is edited. The first occurrence of a file-oriented or record-oriented command 
terminates the effect of the SE command. 

Intra-record commands are applicable only to characters and strings of characters within the specified column limits 
of each record. Characters outside these limits may not be examined by intra-record commands. 

If the SE command is used in the same line as other intra-record commands, it must be the first command in the line. 



Example: 



*EDIT MYFILE© 

*SE 1-100;/=X , 00C4C5D3'/S/=X'D3 1 /© 

*EDIT ANOTHERFILE© 

* 



In this example, an S (Substitute String) intra- 
record command is applied to all records of file 
MYFILE that lie within the range 1.000 through 
100.000. The second EDIT command terminates 
the SE command. Note that intra-record com- 
mands appearing in the same line are separated 
by a semicolon. 
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S (Substitute String) 



S causes the Editor to locate a given occurrence of a specified string and replace it with another specified string. 
The records and columns examined by the S command depend on the action of the current SE, SS, or ST command. 



EJ 



j specifies that the jth 

occurrence of string 1 be- 
tween affected columns is 
to be replaced by string2. 
If j =0, all such occur- 
rences are replaced. If j 
is omitted, only the first 
occurrence is replaced. 



W 



string is the character 

string to be replaced. It 
must lie wholly within col- 
umns c and d specified by 
the current SE, SS, or ST 
command. 



1 



f 



^[j]/stringl/S/string2/© 



w 



string2 is the character 

string to be substituted for 
string 1. If string2 is longer 
or shorter than string 1, sub- 
sequent fields are shifted 
according to the current 
blank preservation mode 
(see description of BP com- 
mand). If string2 is longer 
than string 1, it may extend 
beyond column d when in- 
serted into a record. 



Example: 



*EDIT AFILE © 

*SE 1-10;0/EQU/S/SET/© 



In this example, every occurrence of string 
"EQU" in records 1.000 through 10.000 of 
file AFILE is replaced by the string "SET". 
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D (Delete String] 



D causes the Editor to locate a given occurrence of a specified string and delete it. The records and columns ex- 
amined by the D command depend on the action of the surrent SE, SS, or ST command. 



& 



j specifies that the jth occurrence of the speci- 

fied string between affected columns is to be deleted. 
If j =0 7 all such occurrences are deleted. If j is 
omitted, only the first occurrence is deleted. 



*[j]/string/D ® 



w 

string is the character string to be deleted. It 

must lie wholly within columns c and d specified by 
the current SE, SS, or ST command. Subsequent 
fields are shifted according to the current blank 
preservation mode (see description of BP command). 



If a deletion would leave a gap in a nonblank field, the righthand portion of the field is shifted left to close the gap. 



Example: 



*EDIT ANYFILE© 

*SE 1-20, 10,15;/PAGE/D® 



In this example, the first occurrence of string 
"PAGE" within columns 10 through 15 in 
records 1.000 through 20.000 of file ANYFILE 
is deleted. 
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E (Overwrite String and Extend Blanks) 



E causes the Editor to start at the column occupied by the first character of a given occurrence of a specified string 
and overwrite with another specified string followed by trailing blanks. 



EJ 



j specifies that the ]th 

occurrence of string 1 be- 
tween affected columns is 
to be overwritten bystring2. 
If j is omitted, only the first 
occurrence is overwritten; 
j =0 may not be specified, 
since blank extension pre- 
cludes multiple substitutions 
within the same record. 



UJ 



string 1 is the character 

string to be overwritten. It 
must lie wholly within col- 
umns c and d specified by 
the current SE, SS, or ST 
command. 



Ml/string l/E/string2/© 



fir 



string2 is the character 

string that is to be written 
over string 1. If string2 is 
longer than string 1, it may 
extend beyond column d. 
Trailing blanks are written 
following string2 through 
column 140. 



Example: 



*EDIT THISFILE® 

*SE 1-99 ;1/ L0C1/E/ L0C2/® 



In this example, the first occurrence of the 
string " LOCI" in records 1.000 through 
99.000 of file THISFILE is overwritten by 
string " LOC2" followed by trailing blanks. 



EDIT Subsystem 5-29 



kE (Overwrite Column and Extend Blanks] 



kE causes the Editor to start at a given column and overwrite with a specified string followed by trailing blanks. 



k specifies that the contents of column k are to 

be overwritten by the specified string. Column k 
must iie within columns c and d specified by the 
current SE, SS, or ST command. 



kE/string/(Q\ 



& 



string is the character string to be written. It 

may extend beyond column d and is followed by 
trailing blanks through column 140. 



Example: 



*SE 18-20;15E/R6/® 



In this example, the string "Kb", followed by 
trailing blanks, is written over the contents of 
column 15 in records 18.000 through 20. 000 of 
file SOMEFILE. 
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(Overwrite String) 



O causes the Editor to start at the column occupied by the first character of a given occurrence of a specified string 
and overwrite with another specified string. 



EU 



j specifies that the jth 

occurrence of string 1 be- 
tween affected columns is 
to be overwritten by 
string2. If j is omitted, 
only the first occurrence 
is overwritten. If ] =0, all 
occurrences are overwritten 



3J 



string 1 is the character 

string to be overwritten. It 
must lie wholly within col- 
umns c and d specified by 
the current SE, SS, or ST 
command. 



\ 

*[j]/stringl/0/string2/® 



W 



string2 is the character 

string that is to be written 
over string!. If string2 is 
longer than string 1, it may 
extend beyond column d. 



In the case where j = 0, string2 is not scanned by the Editor after string 1 is overwritten. The Editor begins scanning 
with the column following string2. 



Example 



*EDIT SOMEFILE© 

*SE 1-10 ;0/ ADR3/0/ ADR4/© 



In this example, every occurrence of the 
string " ADR3" in records 1.000 through 
10.000 of file SOMEFILE is overwritten by 
string " ADR4". 



EDIT Subsystem 5-31 



kO (Overwrite Column) 



kO causes the Editor to start at a given column and overwrite with a specified string. 



® 



k specifies that the contents of column k are to 

be overwritten by the specified string. Column k 
must lie within columns c and d specified by the 
current SE, SS, or ST command. 



kO/string/@ 

A 



® 



string is the character string to be written. It 

may extend beyond column d. 



Example: 



*EDIT THISFILE ® 
*SE 15-20;110/R3/© 



In this example, the string "R3" is written over 
the contents of column 11 in records 15.000 
through 20. 000 of file THISFILE. 
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P (Precede String) 



P causes the Editor to insert a specified string at the column occupied by the first character of a given occurrence of 
a specified string, shifting characters of the displaced string to the right as necessary. 



3 



j specifies that the jth 

occurrence of string 1 be- 
tween affected columns is 
to be preceded by string2. 
If j is omitted, only the 
first occurrence ispreceded 
by string2. If j =0, all 
occurrences are preceded by 
string2. 



® 



string 1 is the character 

that is to be preceded by 
string2. It must lie whol 
within columns c and d 
specified by the current 
SE, SS, or ST command. 



1 

[jl/stringl/P/string2/@ 




In the case where j = 0, the Editor inserts string2 at all occurrences of string 1 between columns c and d. Scanning 
for the next occurrence of string 1 resumes following the last character of the previously shifted string 1. If a given 
occurrence of string 1 is shifted beyond column d, due to previous insertions, it will not be scanned. 



Example: 



*EDIT THEFILE © 

*SE 25;TS;0/XY/P/,/;TS© 

XXYXYZWXYZ 

X,XY,XYZW,XYZ 



In this example, a comma is inserted prior to 
each occurrence of the string "XY" in record 
25. 000 of file THEFILE. 
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kP (Precede Column) 

kP causes the Editor to insert a specified string at a given column, shifting displaced characters to the right as 
necessary. 



® 



k specifies that the contents of column k are to 

be preceded by the specified string. Column k must 
lie within columns c and d specified by the current 
SE, SS, or ST command. 



kP/string/® 

A 



w 



string is the character string to be inserted. It 

may extend beyond column d. 



Example: 



*EDIT SOMEFILE© 
*SE 6;TS;7P/G/;TS® 
ABCDEFHIJ 
ABCDEFGHIJ 



In this example, the string "G" is inserted 
prior to the contents of column 7 in record 6 
of file SOMEFILE. Displaced characters are 
shifted one column to the right. 
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F (Follow String) 



F causes the Editor to insert a specified string following the last character of a given occurrence of a specified string, 
shifting displaced characters to the right as necessary. 



E5 



specifies that the jth 
occurrence of string 1 be- 
tween affected columns is 
to be followed by string2. 
If j =0, all such occur- 
rences are followed by 
string2. If j is omitted, 
only the first occurrence is 
followed by string2. 
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string 1 is the character 

string to be followed by 
strihg2. It must lie wholly 
within columns c and d 
specified by the current SE, 
SS, or ST command. 



"1 

_^[j]/stringl/F/string2/© 



05 



string2 is the character 

string that is to follow 
string!. It may extend be- 
yond column d. 



In the case where j = 0, the Editor inserts string2 at all occurrences of string 1 between columns c and d. Scanning 
for the next occurrence of string 1 resumes following the last character of string2. If a given occurrence of string 1 
is shifted beyond column d, due to previous insertions, it will not be scanned. 



Example: 



*EDIT THATFILE© 

*SE 1;TS;/L0C/F/+1/;TS© 

LW,4 LOC LOAD MASK FROM LOC 

LW,4 LOC+1 LOAD MASK FROM LOC 



In this example, the string "+]" is inserted fol- 
lowing the first occurrence of string "LOC" in 
record 1.000 of file THATFILE. 
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kF (Follow Column) 

kF causes the Editor to insert a specified string following a given column, shifting displaced characters to the right 
as necessary. 



E? 



k specifies that the contents of column k are to 

be followed by the specified string. Column k must 
lie within columns c and d specified by the current 
SE, SS, or ST command. 



*kF/string/(S) 



\D 



string is the character string to be inserted. It 

may extend beyond column d. 



Example: 



*EDIT OLDFILE© 

*SE 5;TS;10F/B/;TS© 

AAAAAAAAAAAA 

AAAAAAAAAABAA 



In this example, the string "B" is inserted fol- 
lowing column 10 in record 5 of file OLDFILE. 
Displaced characters are shifted one column to 
the right. 
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R or L (Shift at Substring) 



R or L causes the Editor to shift, to the right or left, a contiguous string of nonblank characters beginning with a 
given occurrence of a specified substring. 



S 



I specifies that the jth occurrence of the 

specified substring between affected columns 
is to be shifted, together with all subsequent 
contiguous nonblank characters. If j is omit- 
ted, only the first such occurrence is shifted. 
Note that j = may not be specified for this 
command. 



® 



R specifies that the string is to be shifted 

to the right. A shift to the right is equivalent 
to the insertion of blank characters prior to the 
specified string. 



L specifies that the string is to be shifted 
to the left. Columns to the left are overwritten 
and blanks are placed in vacated columns to 
the right. 



*[j]/string/| L |s ® 



E 



string is the substring identifying the be- 

ginning of the character string to be shifted. 
The substring must lie wholly within columns 
c and d specified by the current SE, SS, or 
ST command. The specified substring may 
contain embedded blanks, but the string to 
be shifted terminates with the first blank fol- 
lowing the specified substring. 



E7 



s specifies the number of columns by which 

the string is to be shifted. The shifted string may 
extend below column c or beyond column d 
when the shift has been performed. 



Example 



*EDIT THEFILE© 

*SE 100;TS;/lN/L2;TS© 

THE RAIN IN SPAIN 



THE IN 



IN SPAIN 



In this example, the first occurrence of the 
string "IN" in record 1 OO.OOOof file THEFILE 
is shifted left by two columns. 
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kR or kL (Shift at Column] 



kR or kL causes the Editor to shift, to the right or left, a contiguous string of nonblank characters beginning with 
the character at a specified column. 



® 



k specifies the begin- 

ning of the character string 
to be shifted. Column k 
must lie within columns c 
and d specified by the cur- 
rent SE, SS, or ST com- 
mand. The string to be 
shifted terminates with the 
first blank following the 
specified column. 



m 



R specifies that the 
string is to be shifted to the 
right. A shift to the right 
is equivalent to the inser- 
tion of blank characters 
prior to the specified string. 



L specifies that the 

string is to be shifted to the 
left. Columns to the left 
are overwritten and blanks 
are placed in vacated col- 
umns to the right. 






35 



s specifies the number of 
columns by which the string 
is to be shifted. The shifted 
string may extend below col- 
umn c or beyond column d 
when the shift has been 
performed. 



Example: 



*EDIT THEFILE© 
*SE 101;TS;6R3;TS© 
LIES MAINLY IN THE 



LIES 



MAINLY IN THE 



In this example, the string "MAINLY" begin- 
ning at column 6 in record 101.000 of file 
THEFILE is shifted right by three columns. 
String "IN" is also displaced three columns 
to the right, to maintain a single blank be- 
tween nonblank strings, but string "THE" is 
unaffected (blank preservation is assumed to 
be OFF; see description of BP command). 
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TS (Type Without Sequence] 



TS causes the Editor to type the contents of the record currently open for editing under control of an SE, SS, or ST 
command. If more than one record is processed by the current SE, SS, or ST command, each such record is typed 
after all editing up to the TS command has been done. Sequence numbers are omitted. 



Intra-record commands may precede the TS 
command. 



*[...;]TS[;...]© 

i 



® 



Infra-record commands may follow the TS 
command. 



Example: 



*EDIT AFILE© 
*SE11-13;TS© 
PRINXT BAL,R15 SPACE 

LI,R8 COMPRT 

BAL,R15 GEXT1 



In this example, records 11.000 through 
13.000 of file AFILE are typed without 
sequence numbers. 
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TY (Type Including Sequence) 



TY causes the Editor to type the contents of the record currently open for editing under control of an SE, SS, or ST 
command. If more than one record is processed by the current SE, SS, or ST command, each such record is typed 
after all editing up to the TY command has been done. Each record typed is preceded by its sequence number. 



EI 



Intra -record commands may precede the TY 
command. 



*r...;iTYn...i 



u- _l 



m 



Intra-record commands may follow the TY 
command. 



Example: 



*EDTT FILE © 

*SE10;TY;/HERE/P/T/;TY © 
10.000 HERE BAL,R1 EXIT 
10.000 THERE BAL,R1 EXIT 



...I i n rvn n 



record iU.UUU of file FILE is 
typed before and after editing, preceded in 
each case by its sequence number. 
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JU (Jump) 



JU causes the Editor to jump to a specified record while under the control of an SS or ST command, and to continue 
processing records from that point. 



3 



Intra-record commands may precede the JU 
command, but it must be the last command on 
the line. 



^[. ..;]JUn 



QJ 



n specifies the sequence number of the record 

to be processed next. This may be either forward 
or backward from the most recently processed record. 



Example: 



*EDIT SOMEFILE© 
*SS 1© 

1.000** /BSD/S/BAD© 
2. 000** 3 7E/X/ ; JU9 © 
9.000** 



In this example, the Editor processes records 
1.000 and 2.000 of file SOMEFILE under con- 
trol of an SS command. It then jumps to rec- 
ord 9.000 and continues under control of the 
SS command. 
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NO (No Change) 



NO causes the Editor to perform no editing on the current record, while under control of an SS or ST command. 



**NO® 



Example: 



*EDIT THEFILE © 

*SS 1© 

1.000** /$+3/S/LOC22/(S) 

2.000**N O(f») 

3.000** 



In this example, the Editor performs no edit- 
ing on record 2.000 of file THEFILE under con- 
trol of an SS command. Record 3.000 is then 
opened for editing. 
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RF (Reverse Blank Preservation) 

RF causes the Editor to reverse the blank preservation state temporarily. Blank preservation is restored to its initial 
state (ON or OFF) when a new prompt character is typed. Thus, RF must be used as part of a compound command 
line. More than one RF command may be used in a single line. 



EJ 



Intra-record commands may precede the RF 
command but are unaffected by it, since com- 
mands are executed from left to right. 



*[...;]RF;... 



IS 



One or more intra-record commands must fol- 
low the RF command. 



Example: 



*EDIT AFILE® 

*ST 10 @ 

10.000 L5 LW,4 X 

22.RF;4R2;TY© 

10.000 L5 LW,4 X 

11.000 STW,4 Y 



In this example, record 10.000 of file AFILE is 
edited with blank preservation (initially OFF) 
reversed, so that two spaces are maintained be- 
fore "X" when "LW,4" is shifted to the right. 
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EDIT MESSAGES 



Messages 


Meaning 


..EDIT STOPPED 


The record editing mode has been terminated. 


—OVERFLOW 


More than 140characters have been typed on a line or characters 
have been shifted past column 1 or 140. Excess characters are lost. 


-FILE EXISTS: CAN'T BUILD 


An existing file has the same name as that specified in a BUILD 
command. 


..COPYING 


A COPY operation has begun. 


..COPY DONE 


A COPY operation has been completed. 


-P2: FILE EXISTS 


A COPY ON command specified the name of an existing file. 


-PI: NO SUCH FILE 


A COPY command has specified that a nonexistent file is to be 
copied. 


-PI: FILE NOT KEYED &P3 NULL 


A file to be copied has no sequence numbers and no sequencing 
has been specified. The COPY operation has been aborted. 


-NO SUCH FILE 


A specified file does not exist. 


..DELETED 


A specified file has been deleted. 


-FILE NOT KEYED: MUST COPY 


A specified file has no sequence numbers. The file must be 
copied with sequencing specified. 


-NOT ON/OFF 


A parameter other than ON or OFF has been specified in a BP 
or CR command. 


—EOF HIT 


One or both sequence numbers specified are higher than the 
highest one in the file. 


—NOTHING TO DE 


No records (to be deleted) were found in the specified range. 


—xxx RECS DLTED 


The indicated number of records have been deleted. 


—NONE 


No records have been deleted as the result of an FD operation. 


—DONE AT x 


A specified operation has been completed. The value x is the 
current sequence number of the last record affected. 


—NOTHING TO MOVE 


No records (to be moved) were found in the specified range. 


—CUTOFF AT x(y) 


A specified operation could not be completed because of a 
conflict between an existing sequence number and a new one. 
The value x is the current sequence number of the last record 
affected (formerly record y). 


— RNG OVERLAP 


Specified ranges of sequence numbers overlap. The command 
has been ignored. 


-PI: NO SUCH REC 


A specified record does not exist. The command has been 
aborted. 


-P2: REC EXISTS 


A specified record already exists. The command has been aborted. 
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EDIT MESSAGES (cont.) 



Message 


Meaning 


-Cn: COMND ILGL HERE 


The nth command of the current line is invalid and the intra- 
record mode has been terminated. 


— Cn: OVERFLOW 


The nth command of the current line has caused characters to be 
shifted past column 140. Processing continues. 


--Cn: NO SUCH STRING 


A specified string was not found and no substitution was made in 
processing the nth command of the current line. Processing 
continues. 


-MISSING SE 


No SE, SS, or ST command is currently in effect. The specified 
intra-record task has been aborted. 


—Cn: 'ALL' IGNORED 


The value was specified for j. Since this value is not 
meaningful for the command, the value 1 has been assumed. 
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6. FORTRAN SUBSYSTEM 



GENERAL 



The FORTRAN subsystem enables the user to write, compile, execute, and save FORTRAN programs from an on-l 
terminal. 



me 



COMPILER INPUT/OUTPUT ASSIGNMENTS 

During compilation there are various inputs to the compiler, and various outputs will be produced. The user may set 
up his own I/O assignments by using the Executive command ASSIGN prior to calling the FORTRAN subsystem (refer 
to Chapter 3 of this manual.) Default assignments will be made automatically for any input/output assignments not 
specified. Table 6-1 lists the compiler input/output DCBs. 

Table 6-1. Compiler Input/Output DCB Assignments 



DCB 


Description 


M:BO 


Binary output of assembled object program. By default this goes into temporary file 
BOTEMPx, where x is the special ID (see Chapter 3) for the user's terminal; or, the oper- 
ator may specify a file of his own. This is the file specified to the Loader subsystem when 
it is desired to run the program. 


M:DO 


Diagnostic output. Images of source lines in which errors are found will be printed, along 
with error messages. Default assignment is the user's terminal. Also, diagnostic output is 
always included if a program listing is produced; hence if M:LO is assigned to a different 
file than M:DO, the diagnostic will be output to both files. 


M:LO 


Listing output. Default assignment is the user's terminal. 


M:SI 


Source language input. Default assignment is the user's terminal. A previously created 
file may also be specified through use of the EDIT subsystem or through M:SO in a previous 
compilation. 


M:SO 


Source Output. This is a means of saving source language that has been typed and cor- 
rected. Default assignment is to SOTEMP, a temporary file. 

Note: Refer to Tables 3-4 and 3-5. 



I 



COMPILER OPTIONS 

The subsystem is called by typing FO following the Executive prompt character. The Executive types the rest of the 
word and turns control over to the subsystem which requests a list of options. 

1 FO RTRAN 

OPTIONS: 



Any of the options listed in Table 6-2 may be selected, separating them with commas. If a mistake is made, hit 
© X and start the list again. Terminate the list and each line with ©. To specify no optjon list, simply hit ©. 

Table 6-2. Compiler Options 



Option 


Description 


BO or NOBO 


Binary Output file. Operator could specify NOBO when he does not expect to be 
able to execute but would like diagnostics. 


LS or NOLS 


List Source language. Operator might specify NOLS when recompiling a program 
which has previously been debugged, if another program listing is not desired. 
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Table 6-2. Compiler Options (cont.) 



Option 


Description 


SO or NOSO 


Source Output. This saves a copy of the source program in a file on the RAD. It 
is a means of saving a program typed in at the terminal. A request for this option 
is ignored if the input is from a disc file. 


DB or NODB 


Debugging Mode. If this option is specified, then it is possible to stop, start and 
trace execution, and obtain values of program variables during execution of the 
program. 


S or NOS 


Symbolic machine language instructions may be written within FORTRAN source 
programs. 


Note: The operator may request to have or not have any of the above options. The underlined alterna- 
tives will be assumed when there is no specification. 



SOURCE LANGUAGE INPUT 

During compilation, each FORTRAN statement is input and analyzed. Source language may be input from a file on 
the RAD or it may be typed line by line at the user's terminal. For terminal input, the subsystem will prompt the 
user with the line number of each successive line. 

When entering FORTRAN statements to the subsystem, the user may type a colon (:) to indicate the end of each 
complete statement and cause the line to be processed immediately. When an error occurs in a line typed at 
the terminal, the operator is given the opportunity to retype the line. Table 6-3 is an example of a FORTRAN 
compilation. 



Table 6-3. Source Language Input From Terminal 



J_FORTRAN 


Select FORTRAN. 




OPTIONS 


:© 


Default options. 




1: 


A=B:@ 


Source line 1 by user (with a "no continuation" mark). 




2: 


C=D : © 


Source line 2 by user (it may be continued). 




3: 


E=F:© 


Source line 3 by user (with a "no continuation" mark). 




4: 


G=H:© 


Source line 4 by user (it may be continued). 




5: 


END© 


Source line 5 by user (because it is an END statement, 
assumed to have no continuation). 


it is 


SUBPROGRAMS" 








• 




► 


Program summary. 




PROGRAM 


END^ 









FORTRAN DEBUGGING MODE 

The FORTRAN debugging capability constitutes a self-contained portion of the compiled FORTRAN object 
module. 

u/i xL_ i I i i i i : i.. r j.: 1.1 :J i.:c: i: :. j_, I L.. iL~ m :>. 

vriieri me piuyium nua uccii iuuucu unu 13 icuuy iui caci„uiiuii, 111c piuyium lucuin ii^uiiuii 13 typcu uy 111c muiiiiui , 

then an asterisk on the next line. The operator may then type in one or several of the debugging commands appear- 
ing in Table 6-4 (see also Figure 6-1). 
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Table 6-4. FORTRAN Debugging Commands 



Command 


Function 


S 


Execute the program in step mode. 


NS 


Cancel step mode. 


T 


Trace source statement lines reached during program. 


NT 


Stop tracing execution. 


V 


Dump variables. 


NV 


Stop dumping. 


Adddd 


Stop at dddd. 


NA 


Cancel stop. (See above). 


G 


Go. 


R 


Do not stop at subroutine entries. 


NR 


Stop at all subroutine entries. 


Hxxxxxx 


Halt only upon subroutine entry names "xxxxxx". 


NH 


Halt at all subroutine entries. 



! 1 
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Figure 6-1. FORTRAN Subsystem 
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7. LOADER SUBSYSTEM 



GENERAL 

The Loader subsystem will cause a program to be loaded and executed at the user's on-line request. The program 
will consist of one or more relocatable modules of object language coding which have been assembled by BTM 
Symbol, BTM FORTRAN IV-H, Standard Symbol (off-line), Standard Meta-Symbol (off-line), XDS FORTRAN IV 
(off-line), or FORTRAN IV-H (off-line). 

OPERATION 

When the Loader subsystem is called, the operator is requested to specify various information. During operation, 
the Loader subsystem will return some information and diagnostic messages. Table 7-1 lists the various steps in the 
use of the Loader. 

Table 7-1. Loader Subsystem Operating Steps 



Step 


Procedure 


1 


Specify the element file or files that contain the program to be loaded. 


2 


Specify the various options to be in effect during program loading and execution. 


3 


Subsystem will find and load all necessary object modules. 


4 


Subsystem will, if requested in step 2, type a load map containing all references by which 
various loaded modules are related to one another. 


5 


Assign or change any assignments of various DCBs for program input-output. 


6 


Subsystem types out severity level of errors encountered during loading. Decide whether or not 
to proceed with execution of the program. 


7 


If execution is to proceed, specify values for unsatisfied external and internal references (if the 
D option has been specified). 


8 


Program is executed. 



ELEMENT FILES 

Input of object modules is through M:BI. Specify what program is to be loaded by designating the elerflent files to 
be input. If an element file is not specified, it will be assumed that the input is from the temporary file BOTEMPx 
which is also the default output file for on-line assemblies. 

If it is desired to specify a single element file, ASSIGN M:BI before calling the Loader subsystem. After calling 
the subsystem, it types a request after which the user may type a list of element files. 

Examples: 

j_LOAD 

ELEMENT FILES: (R) 
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The Loader subsystem was called. As soon as it took control, it typed a request for the list of element files. In the 
example, the user hit the carriage return, indicating no list; therefore, loading will be from the temporary file 
BOTEMPx. 

1 AS SIGN M:BI,(FILE,MINE)© 

1LOAD 

ELEMENT FILES: © 

Prior to calling the Loader subsystem, the user file MINE was assigned to input DCB M:BI. 

]_LOAD 

ELEMENT FILES: MINE,OURS,HIS(ACCT4,PSST)@ 

The modules to be loaded are in the files MINE and OURS in the log-in account, and HIS in the account ACCT4 
with password PSST. These modules will all be loaded, and if any of them contain primary external references to 
additional modules, a library search will be made. All referenced modules will be loaded as they are found. 

LOADER OPTIONS 

The next step is the request by the Loader for specification of desired options, these options are listed in Table 7-2. 

[LOAD 

ELEMENT FILES: ® 

OPTIONS: P,M,D © 

In the above example, three options have been specified: program modules will be loaded at hexadecimal addresses 
with two low-order zeros, a load map will be produced, and the debugging feature will be employed. 



Table 7-2. Loader Options 



Option 


Description 


N 


Do not search the system library to satisfy external references. This library is the file :BLIB 
(binary object language library) in the account :BTM, and contains various standard program 
modules for general use. 


M 


Produce a complete load map containing all external definitions and references. If this option 
is not specified, only a list of unsatisfied references will be typed by the Loader. 


U 

(acct 1) 
(acct 2) 


This specifies those accounts other than the user's own that may be searched to satisfy external 
references. After the user's own binary object language library is searched, the file :BLIB 
will be searched in each of the specified accounts. If the reference is still unsatisfied, the 
system library will then be searched (unless the N option has been specified). 


P 


Specify this option if all program modules are to be loaded starting at hexadecimal hundreds' 
addresses (i.e., at addresses with two low-order zeros). This is useful during debugging, as 
it facilitates locating instructions from their addresses as they appear in an assembly listing. 


D 


With the D option (the debugging feature), the program will be executed under control of the 
Delta debug program (see BTM Reference Manual). This will enable performance of diagnostic 
and corrective operations on the program. 


L 


With this option, the load module will be placed in the user's program library. 
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ERROR MESSAGES 

The next step is that of finding and loading all required program modules. Messages are typed by the Loader for any 
errors that occur. These messages consist of two lines of information; the first specifies the error, the second lo- 
cates the error. Loader error messages with their corresponding meaning appear in Table 7-3. 



Table 7-3. Loader Messages 



Message 


Meaning 


NO LIB FILE 


The specified library could not be found. 


NO ELEMENT FILE 


The specified element file could not be found. 


ILLEGAL ORIGIN 


An attempt has been made to load outside the available area in the computer 
memory. 


ILLEGAL ROM DATA 


The Relocatable Object Module being loaded contains illegal object language. 


CHECKSUM ERROR 


There was a checksum error in the record specified. 


SEQUENCE ERROR 


A discrepancy was found in the numbering of successive records within an object 
module, or the first record of an object module is missing. 


STACK OVERFLOW 


There is not enough room in memory to fit the Loader, the program, and associ- 
ated areas. 


Note: When each of the above messages is typed, the next line will contain one of the following (xx and 
yy are hexadecimal numbers): 

1. LOADING ELEMENT FILE (name) SEQ. NO. (xx) OVERALL ROM NO. (yy) 

2. PROCESSING LIBRARY (account) SEQ. NO. (xx) OVERALL ROM NO. (yy) 

3. LOADING FROM BI SEQ. NO (xx) OVERALL ROM NO. (yy) 



LOAD MAP 

If the M option has been specified, a load map is produced at the completion of loading. The load map lists ex- 
ternal definitions, giving the address at which each externally defined program location has been loaded into com- 
puter memory. The locations of the beginnings of all loaded modules are shown, as well as the lowest and highest 
program locations, and all DCBs. In addition, the load map will list unsatisfied external references and unused or 
double definitions. The abbreviations used in the load map are listed in Table 7-4. 



Table 7-4. Load Map Abbreviations 



Abbreviation 


Meaning 


SREF 


A secondary reference. Such a reference cannot be satisfied in on-line operations. 
A secondary reference causes an object module to be found, but delays loading of the 
module until a later overlaying operation. Note: No overlaying can be done when 
operating on-line. 


PREF 


An unsatisfied primary reference (REF). The indicated name has not been found in any 
of the libraries searched. 
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Table 7-4. Load Map Abbreviations (cont.) 


Abbreviation 


Meaning 


DEF 

UDEF 
DDEF 


An external definition which was referenced and has been found, with the correspondina 
object coding loaded. The present computer memory address is expressed in hexadecimal 
as xxxx y (xxxx is nearest word, y is byte in word). 

Unused definition. This is an external definition included within that loaded object code 
to which no reference has been made. 

Double definition. More than one definition has been found for this name. The first one 
found has been used. 


Note: When used with the D option, the Loader will provide an additional list of undefined internal symbols 
for programs assembled on-line by Symbol, or off-line by Meta-Symbol with the SD option. The un- 
defined internal symbols are grouped according to the element files in which they occur. 



DCB SPECIFICATIONS 

Following the load map and undefined internals, the subsystem requests any additional DCB specifications which 
may be needed for program input/output operations. The subsystem prompts with (F:), and the operator may type 
one specification per line. This may be used where individual specifications are needed to cause the Loader to 
build a DCB. 

ERROR SEVERITY 

In the next step, the Loader types the highest error severity level which occurred during loading, then asks whether 
or not it is to proceed. 

REFERENCE SATISFACTION 

If execution is requested, and unsatisfied external references exist, the operator will be requested to supply values 
for any references needed (if the D option was specified). The subsystem will type: 

**SATISFY EXTERNALS** 



When running under option D, a list of any undefined internal- references will be typed, which the operator will be 
asked to satisfy. 

**SATISFY INTERNALS** 
The name of the element file will be typed on the next line, and on the line following, the prompt character (<). 

DEBUGGING 

If option D has been specified, the program will be loaded in a special manner and executed under control of the 
debugging program Delta (refer to BTM Reference Manual). Execution may be broken at various points to search, 
inspect, and alter contents of computer memory. 
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F: (DCB Specif ication) 



F: prompts the user to specify any required DCBs that are not designated as external REFs in the user's program or 
DCBs for which one or more options are to be changed. Any FORTRAN DCBs for unit numbers other than 101-106 
or 108 fall into this category and must be specified in this way. 



deb is a FORTRAN unit number (for 

FORTRAN programs) or an alphanumeric DCB 
name of 3-8 characters (including the "F:"). 
If no other parameters are specified (no file 
identifier or options), the DCB is assigned to 
the user's terminal . 



T 



More than one option may be specified (up to 
three). Options may appear in any sequential 
order following the file identifier (if any). 



T 



F:dcb[= fid][,option]. . . 



3 



i, 



fid consists of an equals sign (=) followed 

by a file identifier (fid) of the form f[([a][, pi)]. 



f is 1-11 alphanumeric characters (i.e., A-Z, 

0-9, # , $,*,%, :,@, -, or i__i ). It identifies the 
file to which the DCB is to be assigned. 



a is 1 -8 alphanumeric characters. It speci- 

fies the account containing the file to which 
the DCB is to be assigned. If omitted, the log- 
in account is assumed. 



p is 1 -8 alphanumeric characters. It speci- 

fies the password of the file to which the DCB 
is to be assigned. If the file has no password, 
p is omitted. Note that p must be preceded by 
a comma. 



1 
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option is one of three types of options: 

The function option, one of the following: 

IN specifies that the file is to be used 

in the input mode only. 
OUT specifies that the file is to be 

used in the output mode only. 
INOUT specifies that the file is to be 

used in the update mode. 
OUTIN specifies that the file is to be 

used in the scratch mode. If no func - 

tion is specified, OUTIN is assumed. 

The release option, REL, specifying that 
the file is to be released when program 
execution terminates. If REL is omitted, 
the file will be saved. 

The listing option, L, specifying that the 
file will eventually be output on a listing 
device (FORTRAN programs only). 



The options specified will be inserted into the DCB and, thus, will act asdefault parameters that may be overridden by 
ASSIGN commands or procedure calls. The Loader will continue to prompt DCB specifications by printing "F:" at the 
beginning of each new line until the user inputs a null specification (carriage return only). 

Example: 



!L0AD 


In this example, the user specifies that F:5 is 


ELEMENT FILES: MINE© 


to be assigned to the user's terminal, F:6 to 
scratch file MYFILE, and F:7 to input file 


OPTIONS: L© 


HISFILE in account BTM6. A null specification 


F:5© 


then ends the list of assignments. 


F:6=MYFILE© 




F :7=HISFILE(BTM6) , IN © 




Fi© 




SEV.LEV.=0 




XEQ ?N © 




I 
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XEQ? (Execution Request] 



XEQ? prompts the user to specify whether or not the load module just formed is to be executed and, if so, 
allows a start address to be specified. 



EJ 



Y specifies that the load module is to be exe- 

cuted. The absence of an option (carriage return 
only) will cause the load module to be executed 
as though a Y had been typed. 



N specifies that the load module is not to be 

executed. The Loader responds by returning con- 
trol to the BTM Executive. 



S,adr specifies that the load module is to be 
executed, beginning at location adr (either an 
external definition [±hex. addend] or else a 
signed positive absolute hexadecimal address). 
Hexadecimal numbers are identified as such by 
means of a leading period (the hexadecimal 
equivalent of decimal 26 would be + . 1 A). 



XEQ? 



Y 
N 
S,adr 



Example: 



Sfc,V.LEV=0 



XEQ? S , START+ . A3 © 



In this example, program execution is to begin 
at a location 163 words higher than external 
definition START. 
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**SATISFY EXTERNALS** 

(Satisfy External References] 



**SATISFY EXTERNALS**, followed by a "<" character at the beginning of the next line, prompts the user to 
satisfy undefined external references (any symbol listed as a PREF in the load map). 



This feature is provided only if the 'D' option has been specified. 



GJ 



name is 1-63 alpha- 

numeric characters (i.e., 
A-Z, 0-9, #, $, *, %, :, 

@, -, or i i). It specifies 

which external reference 
is being defined. Typing 
a carriage return immedi- 
ately following the "<" 
indicates that no further 
PREFs are to be defined. 



**SATISFY EXTERNALS** 
< [name > value]® 



57 



> is used to separate 
the name from the value 
that follows. 



& 



is an external 
definition [±hex. addend] 
or a signed positive abso- 
lute hexadecimal address. 
Hexadecimal numbers are 
identified as such by means 
of a leading period (e.g., 
+.1A). 



Example: 



**SATISFY EXTERNALS** 
<SOUBRIQUET>COGNOMEN+.B ® 

<© 



In this example, the PREF named SOUBRIQUET 
is defined as the location 11 words higher than 
external definition COGNOMEN. The © 
following the second prompt indicates that no 
more PREFs are to be defined. 
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**SATISFY INTERNALS** 

(Satisfy Internal References] 



**SATISFY INTERNALS**, followed by a line stating the name of an element file followed by a "<" character at 
the beginning of the next line, prompts the user to satisfy undefined internal references for the cited element file. 
The user may respond with the name and value of any one of the symbols listed as undefined internals (in that 
element file) in the load map. 

This feature is provided only if the 'D' option has been specified. 



ID 



name is 1-63 alphanumeric 
characters (i.e., A-Z, 0-9, 
# A*,%,:,@,-, or u_,). It 
specifies which internal re- 
ference is being defined. 
Typing a carriage return im- 
mediately fol lowing the "<" 
causes the Loader to cite the 
next element file having un- 
defined internals, until all un- 
defined internals have been 
processed. 



**SATISFY INTERNALS** 
*EF-fiie 
<[name>vaiuej © 



5J 



> is used to separate 

the name from the value 
that follows. 



w 



value is an external 

definition [±hex. addend] 
or a signed positive abso- 
lute hexadecimal address. 
Hexadecimal numbers are 
identified as such by means 
of a leading period (e.g., 
+ . 1A). 



Example: 



*EF-FIRSTFILE 

<AGN0MEN>+.1A2B 

< 

*EF-NEXTFILE 

<WHATEVER>THERE- . 1 
< 



In this example, the symbol AGNOMEN in 
element file FIRSTFILE is defined as the ab- 
solute hexadecimal value 1A2B. The@follow- 
ing the next prompt causes the Loader to cite 
element file NEXTFILE. The user then de- 
fines the symbol WHATEVER as one word loca- 
tion lower than external definition THERE (in 
the same element file). When all unsatisfied 
references have been defined, the console bell 
is rung. 
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8. FERRET SUBSYSTEM 



GENERAL 

FERRET is a utility subsystem that provides a general capability for obtaining information pertaining to entries in the 
file management system. It is a useful tool for checking files in storage, and provides functions for file manipulation 
(see Figure 8-1). 

OPERATION 

To call the subsystem, the operator types FE following the (!) prompt character from the Executive. The Executive 
will then reply by finishing the word (FE RRET ) and will display a prompt character (>), ready for the user's command. 

1 FERRET 
> 

Command keywords (e.g., LIST) may be spelled out completely, but only the initial letter is mandatory. If some- 
thing is typed that the subsystem does not recognize, the message COMMAND NOT LEGAL is printed. When any 
operation is completed, the prompt character (>) is printed again. To exit from the subsystem and return to the Execu- 
tive, the operator has only to type an X following the prompt character. It is also possible to exit to the Executive 
at any time, by typing 0@. 



I 
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Executive Level 



! FERRET 










A 


Normal W 


ode 




















LIST 
8-3 




TEST 
8-4 




ACTIVITY 
8-5 




MESSAGE 
8-6 




X 
8-7 



STATISTICS 
8-8 



8-9 



DELETE 



EXAMINE 
■10 



COPY 



8-11 



Statistics Mode 



ALL 



N= 



RAD= 



CPU= 



SERV= 



LOG= 



RADS= 



IO= 



File Examination Mode 



N 



m,n 



© 



Figure 8-1. FERRET Commands (and Page Numbers) 
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LIST (List File Names) 



LIST causes FERRET to print a list of all files in a specified account. 



EJ 



acct is 1-8 alphanumeric characters (i.e., 

A-Z, 0-9, #, $, * 7 %, :, @, -, or,_,). It 
identifies the account for which the listing is 
to be made. If omitted, the log-in account is 
assumed. 



> L[IST] [acct] © 



Example: 



! FE RRET 

>LIST HIS -ACCT© 

THISFILE 

THATFILE 

SOMEFILE 



In this example, FERRET lists "THISFILE", 
"THATFILE", and "SOMEFILE" as names of 
files in account HIS-ACCT. 
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TEST (Test File Accessibility] 



TEST causes FERRET to determine whether the user may read one or more specified files. 



3J 



fid = f[(a[,p])] 



f is 1-8 alphanumeric characters, (i.e., A-Z, 

0-9, # , $, *, %, :, @, -, orv_j). It identifies 
the file to be tested. 



a is 1-8 alphanumeric characters. It speci- 

fies the account containing the file to be tested. 
If omitted, the !og-in account is assumed. 



p is 1-8 alphanumeric characters. Ir speci- 
fies the password of the file to be tested. If 
the file has no password, p is omitted. Note 
that p must be preceded by a comma and ac- 
count number. 



J) 



More than one fid (file identifier) may be 
specified. A comma is used to separate 
each fid from the preceding one. 



>T[EST] fid[,...] 



Example: 



>TEST THIS (MY, FILE), ALSO (ANOTHER)© 
THIS WAS CREATED 6,30,70 AND HAS 
15 GRANULES IN IT. 



In mis example, me user requests a test of file 
THIS having the password FILE and file ALSO 
in account ANOTHER. FERRET indicates that 
the user may access file THIS but not file ALSO. 



CANNOT ACCESS FILE ALSO 
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ACTIVITY (Check File Activity) 



ACTIVITY causes FERRET to check the current activity of one or more specified files. 



CJ 



fid=f[(a[,p])] 

f is 1-8 alphanumeric characters (i. e.,A-Z, 
0-9, # , $, *, %, :, @, -, or ,_,). It identi- 
fies the file to be checked. 



a is 1-8 alphanumeric characters. Itspeci- 

fies the account containing the file to be 
checked. If omitted, the log-in account is 
assumed. 



p is 1-8 alphanumeric characters. It speci- 

fies the password of the file to be checked. If 
the file has no password, p is omitted. Note 
that p must be preceded by a comma and ac- 
count number. 



3J 



More than one fid (file identifier) may be 
specified. A comma is used to separate 
each fid from the preceding one. 



> A[CTIVITY] fid[, . . .] 



Example: 



! FE RRET 

>A FILE (MY, #$*%)© 

FILE IS INACTIVE 

> 



In this example, the user requests a check of 
file FILE having the password *$*% in the 
log-in account. FERRET indicates that the 
file is inactive and, hence, may be opened. 
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MESSAGE (Message to Operator) 



MESSAGE causes a specified message to be printed on the system operator's console, prefaced by a note identifying 
the originating console. 



O 



fexf specifies the message to be output on 

the system console. 



>M[ESSAGE] tex 



I V?ET) 



Example: 



! FE RRET 

>M IS BATCH JOB Z9M9Z, SMITH DONE?® 

> 

NOT YET 

> 



In this example, the user specifies a message to 
the operator and waits for the reply. 
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X (Return to Executive] 

X causes control to be returned to the BTM Executive. 

>X(B 



Example: 



! FERRET 



>DELETE ANYTHING© 
>X© 



In this example, the X command is used to re- 
turn control to the Executive after completion 
of FERRET operations. The exclamation char- 
acter indicates that the Executive is in control. 
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STATISTICS (Give Statistics] 

STATISTICS causes FERRET to enter the statistics mode. 



>s[tatistics] 



In this mode, FERRET prompts with a "*" character indented 4 spaces to the right. Following this, the user may re- 
quest any or all of various statistics: 

*ALL ® Return all statistics listed below, then exit from the statistics mode to the normal mode. 

*X @ Exit from the statistics mode to the normal mode. 

*N = Return number of users currently logged in. 

*LOG= Return amount of time current user has been logged in. 

^RAD = Return number of RAD granules used in current session. 

*RADS= Return number of RAD granules available at start of current session. 

^CPU = Return current amount of CPU execution time used in current session. 

^IO = Return current amount of IO wait time used in current session. 

*SERV= Return current amount of Monitor service time used in current session. 



Example: 



! FE RRET 

>COPY THISFILE,THATFILE © 

>S ® 

#RAD=50 

> 



In this example, the user requests a listing of 
RAD space used for the current session. FERRET 
indicates that 50 granules have been used. 
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DELETE (Delete File) 



DELETE causes one or more specified files to be deleted from the log-in account. 



EJ 



fid = f [(a,p)] 



f is 1-8 alphanumeric characters (i.e., A-Z, 
0-9, # , $, *, %, :, @, -, or .__.). It identifies 
the file to be deleted. 



a is 1-8 alphanumeric characters. It iden- 

tifies the log-in account. 



p is 1-8 alphanumeric characters. It speci- 

fies the password of the file to be deleted. If 
the file has no password, p is omitted. Note 
that p must be preceded by a comma and ac- 
count number. 



ICU 



More than one fid (file identifier) may be 
specified. A comma is used to separate each 
fid from the preceding one. 



1 
>D[ELETE] fid[, . . .] © 



Example: 



! FE RRET 

>DELETE THISFILE,THATFILE, ANOTHER© 
> 



In this example, the user requests FERRET to 
delete files THISFILE, THATFILE, and 
ANOTHER from the log-in account. 
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EXAMINE (Examine File] 



EXAMINE causes FERRET to enter the file examination mode. 



m 



fid=f[(a[,p])] 



f is 1-8 alphanumeric characters (i.e., A-Z, 
0-9, *, %, *, %, :, @, -, ori_j). It identifies 
the file to be examined. 



a is 1-8 alphanumeric characters. It speci- 

fies the account containing the file to be 
examined. 



p is 1-8 alphanumeric characters. It speci- 

fies the password of the file to be examined. If 
the file has no password, p is omitted. Note 
that p must be preceded by a comma. 



>E[XAMINE] fid© 



In the file examination mode, FERRET prompts with a "*" character. Following this, the user may request any of 
various actions: 



#X0 
#N© 

£[H]® 
#B[m[,n]]© 

£[H]m© 
# [ri]m,n© 



Exit from file examination mode to the normal mode. 

Display, in decimal, the number of records in the file. 

Print, in EBCDIC (or hex., if H is specified), the contents of all records in the file. 

Print, in decimal, the number of bytes in record m, records m through n, or the 
entire file. 

Print, in EBCDIC (or hex., if H is specified), the contents of record m. 

Print, in EBCDIC (or hex., if H is specified), the contents of records m through n. 



Example: 



! FE RRET 

>E PLURIBUS(UNUM)© 

#25® 

L0C8 BE $+3 

#X© 

> 



In this example, the user requests FERRET to 
print the contents of record 25 of file PLURIBUS 
in account UNUM. FERRET responds by print- 
ing "LOC8 BE $+3" and the user then ends 
the file examination mode by typing an X fol- 
lowed by a carriage return. 
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COPY (Copy File] 



COPY causes FERRET to create a new copy of an existing file. 



U3 



fidl =filel[(al[,pl])] 



filel is 1-8 alphanumeric characters (i.e., 

A-Z, 0-9, #, $, *, %, :, @, -, or^). It 
identifies the file to be copied. 



al is 1-8 alphanumeric characters, It speci- 

fies the account containing the file to be copied. 



pi is 1-8 alphanumeric characters. It speci- 

fies the password of the file to be copied. If 
the file has no password, pi is omitted. 



® 



fid2 = file2[(a2[, P 2])] 



file2 is 1-8 alphanumeric characters. It 

identifies the new file. 



a2 is 1-8 alphanumeric characters. It iden- 

tifies the log-in account. 



p2 is 1-8 alphanumeric characters. It speci- 

fies the password of the new file. If no password 
is wanted, p2 is omitted. 



>C[OPY] fidl,fid2 



Example: 



! FE RRET 

>C S0MEFILE(: SYS ),MYCOPY (MY, XANADU)© 

> 



In this example, the contents of file SOMEFILE 
are copied from account :SYS into the log-in 
account with the name MYCOPY and having 
the password XANADU. 
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FERRET MESSAGES 



Message 


Meaning 


COMMAND NOT LEGAL 


FERRET has encountered an illegal command. 
The command must be retyped correctly. 


CANNOT ACCESS FILE xxxxxxxx 


The specified file cannot be accessed by the 
user. 


xxxxxxxx IS INACTIVE 


The specified file can be opened. 


xxxxxxxx IS ACTIVE 


The specified file cannot be opened. 


CANNOT DELETE FILE xxxxxxxx 


The specified file cannot be deleted by the 
user. 


CANNOT CREATE FILE xxxxxxxx 


The specified file cannot be opened in the out- 
put mode. 


CANNOT COPY - - RECORDS TOO LARGE 


A COPY command has been aborted because a 
record longer than 512 words was encountered. 


RECORD EXCEEDS BUFFER SIZE, 512 WORDS GIVEN 


A record longer than 512 words was encountered 
in the file examination mode. 


FIRST RECORD NON-EXISTENT 


The first record requested in a file examination 
command was not found in the file. 


UNEXPECTED EOF AFTER RECORD j 


An end-of-file was encountered prior to read- 
ing the last record specified in a file examina- 
tion command. 
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9. SYMBOL SUBSYSTEM 



GENERAL 

The Symbol subsystem assembles programs in XDS Symbol source language. The language is described in the XDS 
Symbol/Meta-Symbol Reference Manual (90 09 52). Input is source coding, either typed directly at the user's ter- 
minal or from a file. Output is a program listing and/or an assembled object program which may be loaded and exe- 
cuted by the Loader subsystem (refer to Chapter 7). 

INPUT/OUTPUT ASSIGNMENTS 

Prior to calling the Symbol subsystem, it is possible to make input/output assignments by use of the Executive 
ASSIGN command (refer to Chapter 3). Input/Output assignments are listed in Table 9-1. 

Table 9-1. Input/Output Assignments 



Symbol 


Description 


M:SI 


Source language input. The default assignment is to the user's terminal. An alternative 
is for the user to specify a file previously created by use of the EDIT subsystem. 


M:LO 


Listing output. Default assignment is to the user's terminal. 


M:BO 


Binary output of assembled object program. By default this goes into temporary file 
BOTEMPx, where "x" is the special ID for the user's terminal. The user may also specify 
a file of his own. This is the file to be specified to the Loader when it is desired to run 
the program. 



ASSEMBLER OPTIONS 

The subsystem is called following the Executive prompt character by typing SY. The Executive will then type the 
rest of the word and turn control over to the Symbol Subsystem, which then requests a list of options. The operator 
may specify options listed in Table 9-2, separating them with commas. If no options are specified (carriage return 
only), all the options listed in Table 9-2 and shown in Figure 9-1 are assumed. 

Table 9-2. Symbol Options 



Symbol 


Option 


BO 


Binary output of an assembled object program. 


LO 


Output a program listing. 


CN 


Include a cross-reference list in the program listing. 


SD 


Include special symbol tables for use by the Loader subsystem 
run-time. 


s debugging feature 


at 



I 



The following is an example of a Symbol assembly with source input from a file on the disc, and listing output to a 
file on the disc. All options are selected with the exception of debugging feature symbol tables (SD). 

{AS SIGN M:LO,(FILE,CMPLO) 

1AS SIGN M :SI,(FILE,CMPS) 

1 SY MBOL 

OPTIONS: BO, LO, CN 

**END OF ASSEMBLY** 
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LISTING FORMAT 

If the program listing is typed on the user's terminal, it will automatically be reformatted to fit the carriage width. 
Each listing line will be typed as two lines: 

1. The first line will contain the source image. 

2. The second line will contain the line number and object code portion of the normal listing. In addition, if the 
source file was on disc in EDIT format, the EDIT file sequence number will be typed in decimal format. 

If the assembly listing is not being displayed at the terminal, any errors found in the assembly are displayed both at 
the terminal and in the listing file. Three lines are typed at the terminal: 

1. The offending source line. 

2. The normal Symbol error indicator (****) and a letter positioned under the image. 

3. The line number, object code produced, and sequence number of the record. 
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Figure 9-1 . Symbol Subsystem 



9-2 Symbol Subsystem 



10. BATCH PROCESSING MONITOR [BPMj SUBSYSTEM 



GENERAL 

Batch jobs, complete with control commands, may be entered into the queue of jobs to be processed (see Figure 10-1). 
This batch processing is performed simultaneously with on-line operations of the computer system, and independently 
of them. For this reason, the user knows only that when a job is scheduled, it will be run in its proper turn sometime 
later. Inquiries are permitted from the on-line terminal pertaining to the status and progress of the job. 



OPERATION 

The BPM Subsystem may be called directly and a job inserted, or the operator may first contruct a file using the 
EDIT subsystem and have BPM read the file. The BPM subsystem expects that input is to be typed at the user's 
terminal. If it is desired that the input be read from a previously created file, the assignment is changed (via an 
ASSIGN M:SI) prior to calling BPM. After log-in, the operator types the letters BP for the subsystem, which re- 
plies with the question, INSERT JOB? . The operator types Y if a job is to be entered, or N for status check of 
previously scheduled job, then a carriage return (see Figures 10-2 and 10-3). 
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Figure 10-1. BPM Subsystem 
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Format 



If a job is to be entered from the user's 
terminal, the subsystem will type se- 
quence number 1, then on next line, 
a colon. 



! record no. 1© 

1 



Operator types (!) then control state- 
ment such as JOB, FORTRAN, etc. © 



Sequence number 2 and colon will be 
returned. Operator types record no. 2 
then © as above. Same for n number 
of inputs. 



:©■ 



EDIT?- 



Operator hits carriage return immedi- 
ately after colon to terminate input. 



Subsystem interrogates 



NJ 



Type Y for Edit feature to make change 
or type out any input (see Table 10-1). 



© 



Type _N_ for job to be inserted as it is 
into scheduling queue. 



JOB INSERTED ID = xxxx 



Message states that job has been inserted into queue 
and gives ID number for status checking. 



Example 

JJBPM 

INSERT JOB? Y © 

1 

j :jud iz jq- o ,ai v ij.in,M- viiv 

2 

j_!ASSIGN M:SI, (FILE, PRIVATE, 54321),, © 
3 

j_!(PASS,PSST) © 
4 

: ! ASSIGN M:L0, (FILE, PRIVATE), ; © 
5 

j_!(SAVE),(READ,122),(PASS,PSST)© 
6 

j_!RUN(LMN,RDWRT) © 
7 

1® 

EDIT? N © 

JOB INSERTED. ID=AA 

STATUS CHECK? N© 



Example above beginswith Executive in control (! ) 
and a call is made to BPM. Job is typed in from 
the terminal and inserted with no editing. No 
status check is taken, and subsystem relinquished 
to the Executive (!). 



Figure 10-2. Terminal Input 



10-2 Batch Processing Monitor (BPM) Subsystem 



Format 



DISPLAY FOR EDITING 



If a file on the disc has 
been assigned as input 
to subsystem, BPM will 
read file then interrogate. 



Y 



Type Y if it is desired to have input 
file printed out for operator's inspec- 
tion. Then type © . 



►© 



N 
v j 



Type N. to insert the job directly into 
batch processing scheduling queue. 
Then type ©. 



If job is displayed (Y above) job state- 
ments will be typed out line by line, 
alternating with sequence numbers un- 
til last line when EDIT? is asked. 



EDIT? < 



A 



Type Y_ to use subsystem 
edit feature, then ©. 



© 



Type N_ to insert job as 
is, then © . 



JOB INSERTED,ID = xxxx- 



Message if N 
above is typed. 



9 — 



Interrogation if Y_ above is typed. 



Example 



If example in Figure 10-2 had been entered as file 
on disc, and it was desired to inspect the control 
statements: 

! AS SIGN M:SI,(FILE,MYJOB),(IN)© 

1BPM 

INSERT JOB? Y © 

DISPLAY FOR EDITING? Y © 

1 

!J0B 12345, SMITH, 4 

2 

! ASSIGN M:SI, (FILE, PRIVATE, 54321),; 

3 

!(PASS,PSST) 

4 

! ASSIGN M: LP, (FILE, PRIVATE),; 

5 

! (SAVE), (READ, 122), (PASS, PSST) 

6 

!RUN(LMN,-RDWRT) 

EDIT? N © 

JOB INSERTED. ID=BC 

i 
STATUS CHECK? N© 



Initially Executive has control and ASSIGN com- 
mand makes file MYJOB input at next subsystem 
called. Upon call BPM reads file. Display is re- 
quested and file of job control statements is typed. 
No edit. Job is inserted and given ID number. No 
status check. Control is returned to the Executive. 



Figure 10-3. Disc File Input 
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Table 10-1. BPM Edit Feature 



Command 


Function to be Performed 


?T© 


Type file 




?Txx [,yy] © 


Type lines xx [thru yy] 




OYfii 


Abort current task 




?G® 


Go (run current task) 




?Sxx,yy© 


Swap lines xx and yy 




?Dxx[,yy] ® 


Delete xx [thru yy] 




1 A C^ 

r/-\xx tv 


Add the foi lowing iines after iine xx 




2 Rxx Dyy] ® 


Replace xx [thru yy] with the following 


lines 



BPM STATUS CHECK 

It is possible to check the status (waiting, running, or completed) of any job previously inserted into the batch pro- 
cessing queue. When the subsystem inserts a job, it inquires whether the user wishes to check status, or the user 
may call BPM and enter the status-checking routine by answering N to the question INSERT JOB? . The subsystem 
then prints out ID =, and the operator types in the hexadecimal ID number. 

ID =A4 ® 



The subsystem then types out one of the following: 

1. RUNNING 

2. COMPLETED 

3. NON-EXISTENT 



4. WAITING ON OUTPUT 

5. WAITING: n AHEAD 
CURRENT ID:x 
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BPM MESSAGES 



Message 


Meaning 


MISSING !JOB COMMAND, OR RECORDS 

OUT OF ORDER 

EDIT? 


JOB command was not recognized in first line, so job can- 
not be scheduled. Either the edit feature to correct the 
condition, or X command to abort must be used before it 
is possible to continue. 


IMPROPER JOB PRIORITY 
EDIT? 


An improper job priority value has been given in the job 
statement. Hexadecimal numbers 1 to F only are valid. 
This message might result if an attempt was made to con- 
tinue the job statement to the second line. This will not 
prevent insertion of the job but priority level is automat- 
ically set to 1 . If the job does not specify a priority level 
at all, level 1 is assumed with no message. 


!FIN CARD IGNORED 


A FIN command has been discovered in the job and has 
been ignored. Insertion of the job is not prevented. 


BAD I-O. ABNORMAL CODE - xx 


An input/output error or malfunction has occurred during 
processing by the subsystem. The I/O system code for the 
fault is given. BPM aborts, returning control to the 
Executive. If job has not been inserted, BPM must be 
called. 


FILE TOO LARGE. TASK ABORTED 


The input job is too large to be handled. Begin with 
smaller job file. 


NO INPUT DATA. BYE 


Nothing in job file. No action, and control returns to 
the Executive. 


NON EXISTENT LINE 


A line referenced by an Edit command does not exist in 
the job file. It is possible that the line was inadver- 
tently deleted. 


ERRONEOUS COMMAND IGNORED 


An Edit command has been rejected because the command 
or its operands have been improperly written. No action 
has been taken. Retype the command. 


ILLEGAL CAL 


The present system monitor is not capable of accepting a 
batch job. The job cannot be inserted. 


INVALID ID 


An erroneous job ID has been given in a status-check re- 
quest. Retype ID. 


IMPROPER JOB ACCOUNT 


The account number in the job statement does not match 
the account number given at log-in. Use Edit feature to 
correct job statement. 


AUTHORIZATION REQUIRED 


User is not authorized to enter a job from a terminal. 
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11. RUN SUBSYSTEM 



GENERAL 

The RUN subsystem allows the on-line user to execute previously formed load modules. It simulates several BPM 
services that otherwise would not be available to the on-line user, allowing overlayed modules to be executed. 
Thus, most load modules capable of batch execution will also execute on-line. However, the execution bias must 
be at least one page above the lower limit of the user area. If the module is relocatable, it will be relocated 
automatically. 

All program changes made via the RUN subsystem apply to the current memory image of the program. If the affected 
location lies within the bounds of the segment selected by the most recent s;S command (but not in the root or back- 
ward path), the change is also added to a table of modifications to be made each time the segment is brought into 
core. Changes affecting only the current image are destroyed if that image is overlayed as the result of an M:SEGLD. 

Two or more breakpoints may be placed at the same core location, but in different overlay segments. When a break- 
point is cleared, it will not be activated unless explicitly restored by an e;B command; if the affected segment is 
currently in core, the replaced instruction is restored in the core image as well as in the load module. 

A load module executed under control of the RUN subsystem must be smaller than the on-line user area minus the 
size of the RUN subsystem itself (which occupies about 2.5K of core). During execution, the user program may ac- 
quire dynamic data pages in an amount up to the difference between user area size and load module size. 

If the load module is overlayed, it may have not more than three files open at any one time. Nonoverlayed pro- 
grams may have up to four files open at the same time. All I/O done through DCBs will be output to the user's 
terminal unless an Executive-Level disc-file assignment of the DCB exists or the DCB contains a "built-in" disc- 
file assignment. 

In addition to the BPM CALs available to all on-line programs, the RUN subsystem allows the use of the following: 

M.-SEGLD M:GL 

M:GP M:GCP 

M:FP M : FCP 

M:SMPRT ' M:TIME 

The RUN subsystem is entered by the Executive command 
jRUN © 

On entry, RUN requests load module identification, as follows: 
LOAD MODULE FID: 

The user then supplies the file identifier of the load module in the form 
name [( [acct] [,pass])] © 

For example: 

jRUN® 

LOAD MODULE FID: SL1(:SYS,PASS)© 

PRE-EXECUTION DEBUGGING 

When the load module has been identified, RUN will wait for one or more commands pertaining to execution of the 
program. The following commands, comprising a subset of the Delta debug language, may be used. 

[s];S Selects a symbol table by overlay segment name (or root if s is omitted). All REFs and DEFs of the 
specified segment and its backward path are made available to RUN. 

[e] / Displays the contents of cell e (or register if e is omitted). The cell may then be modified (i. e. , It 
is "open"). 
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el,e2/ Displays the contents of cells el through e2 and opens cell e2. 

© Closes the currently open cell. 

e® The expression e is assembled and , stored in the currently open cell. 

© Opens the next higher cell. 

e© Modifies the currently open cell and opens the next higher cell. 

f Opens the next lower cell. 

et Modifies the currently open cell and opens the next lower cell. 

© Displays and opens the cell addressed by the last quantity typed (represented by the symbol ;Q). 

e© Modifies the currently open eel! and then displays and opens the eel! addressed by the last quantity 

typed. 

;G Begins execution at the point determined by the contents of the current execution location counter 

(represented by the symbol ;I). 

e;G Begins execution at the location specified by the expression e. 

;P Causes execution to proceed from a breakpoint. 

;B Displays all breakpoints as they are encountered during execution. 

e;B Inserts a breakpoint at the location specified by the expression e. 

n;B Clears (i.e. , removes) breakpoint n (0<n<8). 

e;I Stores the value of the expression e into the current execution location counter. 

e;C Sets the value of the condition code to that of the expression e. 

;A Causes location values to be displayed in hexadecimal. 

;R Causes location values to be displayed as a symbol plus a hexadecimal offset. 

Expressions in the above commands may comprise any combination of sums and/or differences of symbols and con- 
stants. Constants may be either decimal or hexadecimal (indicated by a leading period). In addition to any 
of the symbols in the symbol table most recently specified by an s;S command, any of the following symbols 
may be used in an expression. 

Symbol Meaning 

Address of most recently opened cell 

;I Value of current execution location counter 

;C Condition code value 

;Q Most recently displayed value 
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